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Ihren Commodore CA6: 
DAS GROSSE C-16 BUCH 


Hier erfahren Sie alles, was Sie brauchen, um die Möglichkeiten 
Ihres C-16 voll auszunutzen. Sämtliche wichtigen Bereiche, wie z.B. 
Grafik, Sound, Maschinensprache werden ausführlich behandelt 
und u vielen Beispielen Se Dieses Buch ist für jeden 
Commodore-16 Besitzer unentbehrlic 

M Einzelpreis: 


SE DESIGN 





JOYSTICK 


Original Commodore- 
Joystick im eleganten 
und handlichen De- 
sign für viele Stunden 
Spielspaß; steigert die 
Freude bei praktisch 
allen Spielen enorm. 
Direkt anschlußfertig 
für Ihren C-16. 


Einzelpreis: 


9» 


PLUS-PAKET 


Die ideale Spielesammlung für alle Einsteiger, 
bestehend aus 4 absoluten Top-Programmen 
(siehe auch Rückseite): 

GRANDMASTER; spielstarkes 
Schachprogramm mit viel Komfort an 
TOM, faszinierendes Arcade-Adventure TE ee Plus 4 
mit 178 (!) Bildern Ian 
GALAXY, schnelles und 
abwechslungsreiches Weltraumspiel 

GHOST TOWN, spannendes Grafik-Adventure 


für die ganze Familie 
: "Einzelpreis: 0) Ale 3 Ti Sie sparen 28.- 


Wil) 2 statt 27--nur 
SOFT F. SCHÄFER — 
WTA ae 





EDITORIAL 


Lieber Leser! 


Eine kleine Verwirrung möchte 
ich gleich zu Beginn gerade- 
rücken. In der Ankündigung 
dieses Sonderheftes in ”Compu- 
te mit” 12/86 haben wir dieses 
Heft als Ausgabe 4 bezeichnet. 
Um aber den Zeitschriftenhan- 
del nicht zu verwirren, trägt die- 
se Ausgabe korrekterweise die 
Nummer 1/87. Natürlich han- 
delt es bei diesem Heft um die 
Ausgabe, die noch im Dezem- 
ber erscheint, und daher möch- 
te ich auf diesem Wege allen un- 
seren Lesern nicht nur ein fro- 
hes Fest,sondern ganz besonders 
ein erfolgreiches Jahr'1987 wün- 
schen (auf daß die Hardware- 
und Softwarepreise weiter 


fallen). 


Das vorliegende Sonderheft ist 
in mehreren Punkten ein ganz 
besonderer Leckerbissen. Eine 
dieser Spezialitäten dieses Hef- 
tes, ist der Schwerpunkt über 
die Grafik- und Soundprogram- 
mierung mit dem TED-Chip 
des C 16/116/plus 4, die unseres 
Wissens nach an keiner anderen 
Stelle so ausführlich beschrie- 
ben wird, wie in diesem Heft. 
Den C16/116/plus 4-Besitzern 
wird also eine hervorragende 
Programmierunterstützung in 
die Hand gegeben, wie schon 
mit dem Sonderheft 3, in dem 
der Genesis-Super-Assembler 
- veröffentlicht wurde, der mo- 
mentan auf dem gesamten C-16- 
Softwaremarkt absolut konkur- 
renzlos dasteht. 


Als Folge ständig. verbesserter 
Programmiermöglichkeiten 
können wir in diesem Heft Pro- 
gramme exzellenter Qualität 
anbieten. Unsere Stammauto- 
ren schreiben mittlerweile ihre 
Programme vornehmlich in 
Maschinensprache, denn nur so 
läßt sich der Speicherplatz des 
C-16/116 voll ausnutzen. Am 
Ende haben die technischen 
Einschränkungen dieses Com- 
putersystems einen entscheiden- 
den Vorteil: man wird dazu ge- 
zwungen, in die Funktionswei- 
se des Computers Einblick zu 
nehmen und kann sich nicht, 
wie bei den neuen großen Ma- 
schinen (AMIGA und ATARI 
ST) auf komfortable Program- 
me verlassen. Immer mehr Be- 
sitzer des C 16 jedenfalls sind zu 
hervorragende Programmierern 
der Maschinensprache herange- 
wachsen. Wann gehören auch 
Sie dazu? 


Und: wenn Sie nicht den Ehr- 
geiz dazu haben, können Sie si- 
cher sein, daß Sie für sehr wenig 
Geld allerhand erhalten haben. 
Auch wenn das, was Sie mit Ih- 
rem Computer machen kön- 
nen, nicht in allen Dingen so 
toll aussieht, wie mit einem 16- 
Bitter, der aber auch das Zehn- 
fache kostet. ! 


G [ Zu) E 
Uwe Knierim 
Chefredakteur 
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UDO GERTZ, 


Eröffnungsbild »Sommer-Olympiade« 


Neue Software-Produkte von 


C-16/116 und Plus 4 Spezialisten aus Deutschland 


Die Fa.Kingsoft entwickelt sich im deutschen Software-Markt 
zum Programm-Spezialisten für die »kleinen Commodore«! 


Nachdem das Jahr 1986 für die 
Fa. Kingsoft von der produktion- 
stechnischen. Seite. einen. guten 
und erfolgreichen Abschluß ge- 
funden hat, will man auch 1987 
wieder mit neuen Produkten 
glänzen. Der absolute Software- 
Hit soll nach dem Willen der Ma- 
cher das Programm ”Sommer 
Olympiade” werden. Wir haben 
uns natürlich mit der Fa. Kingsoft 
in Verbindung gesetzt und nach 
dem Stand der Dinge gefragt. So 
war zu erfahren, daß die ersten 3 
Disziplinen der "Sommer Olym- 
piade” bereits fertiggestellt sind 
und an den drei weiteren fieber- 





haft gearbeitet wird. Es war uns 
vergönnt, verschiedene Program- 
mausschnitte und -folgen zu te- 
sten. ”Sommer Olympiade” ist 
vom Ablauf her ähnlich dem der 
"kalten Spiele” aufgebaut. So 
können Sie auch hier wieder zwi- 
schen sechs verschiedenen Diszi- 
plinen wählen (u.a. Radfahren, 
Stabhochsprung, Turmspringen, 
Wildwasserkanu usw.). Eine Er- 
öffnungszeremonie, mit Wahl der 
Landesfarben und der Hymnen 
ist dabei ebenso vorgesehen, wie 
die Wahl der Mitspieler (insge- 
samt 4). Bei der Disziplin ”Rad- 
fahren” ist eine lebensechte Ani- 


x SERSSS | 
38, RD H 


Die Eröffnungsfeier mit entzünden der olympischen Flamme im Stadion! 


Sompute mib 





Ein Turmspringer in seinem »nassen« Element! 


mation verwirklicht worden und 
wir waren schon etwas über- 
rascht, daß es dem Programmie- 
rer wieder gelungen ist, eine so 
bestechend gute Grafik zu erstel- 
len. Auch bei der Disziplin 
»Turmspringen” könnte man 
meinen, man befände sich in der 
Umgebung eines echten 
Schwimmbades und ist Teilneh- 
mer eines spanndenen Wett- 
kampfes, bei dem es darum geht, 
die erforderlichen Höchstnoten 
für jeden Sprung zu erzielen. Na- 
türlich können wir hier noch kei- 
nen vollständigen Testbericht 
veröffentlichen, aber bei den we- 







Weitere 
| Software-Neuheiten 


nigen Ausschnitten und Spiela- 
bläufen die wir gesehen haben, 
kann man schon jetzt vermuten, 
daß auch das Programm ”Som- 
mer Olympiade” ein echter Hit 
werden wird. Es dürfte seinem so 
erfolgreichen Nachfolger ”Win- 
ter Olympiade” mit Sicherheit in 
nichts nachstehen. Die Fortset- 
zung dieses Sportspiels ist. ein 
Muß für jeden Anwender und: 
sollte deshalb schon jetzt auf Ih- 
rem Software-Wunschzettel für 
1987 stehen. Mit der Veröffentli- 
chung des Programmes ist übri- 
gens im Januar ’87 zu rechnen. 


rr%r 






Zwei weitere Software-Neuheiten 
der Fa. Kingsoft sind die Programme: 


_ Brigdehead und 
Karate King 


Bei Brigdehead handelt es sich 
um eine gelungene Adaption der 


Green-Beret-Spielidee. Sie müssen 
hier nach alter ”Rambo”-Manier . 


Compute mit — Sonderheft — 1/87 


über das Spielfeld hasten und alles 
niedermachen was sich Ihnen in 
den Weg stellt. Für diese Aufgabe 
stehen Ihnen natürlich verschie- 
dene Waffen als Hilfsmittel zur 
Verfügung. Sie können die An- 
greifer per Hand, mit Pistole oder 
Gewehr bis hin zur Handgranate 
zur Strecke bringen. Sollten Sie 
einmal von einem Ihrer Gegener 
ins Jensseits befördert worden 
sein, beginnt das Spiel nicht von 
vorn, sondern wird an der Stelle 
fortgesetzt, an der Sie zuletzt ge- 
kämpft haben. 

Insgesamt ist dieses Programm in 
acht verschiedene Level mit je- 
weils 9 unterschiedlichen Bildern 
unterteilt. Für diesen program- 
miertechnischen Gewaltakt sind 
aber auch volle 30K-Bytes Spei- 
cherplatz nötigt, so daß Sie schon 
einen erweiteren Rechner oder 
den Plus 4 verwenden müssen. 
Nach Auskunft des Herstellers 
soll es auch eine Version für die 
Grundgeräte geben, jedoch wird 
diese dann mit Sicherheit nicht al- 
le hier vorgestellten Schwierigkei- 
ten und Rafinessen enthalten. 
Einzelkämpferfanatiker und an- 
‘dere Kämpfernaturen werden an 


diesem Action-Spiel ihre helle 
Freude haben. 

Das zweite vorgestellte Pro- 
gramm ”Karate King” läßt schon 
vom Titel her keine Zweifel auf- 
kommen, um welche Art von 
Spiel es sich hierbei handelt. Hier 
müssen alle Freunde der japani- 
schen Kampfsportart Kung-Fu ih- 
re Fähigkeiten unter Beweis stel- 
len. Dabei sind schnelle Reaktio- 
nen, ein gutes Auge für die 
Situation und die entsprechende 
Kampfstärke gefragt. Sie müssen 
ihren Gegner mit Hilfe von Fuß- 
tritten, Faustschlägen und ande- 
ren. den Regeln entsprechenden 
Kampfhandlungen auf die Matte 
zwingen. Im Hintergrund wacht 
der ”Meister” über das Kampfge- 
schehen und gibt am Ende des 
Schlagabtausches den Sieger be- 
kannt. Die gute Grafik und die 
spannende Spielanlage lassen ver- 
muten, daß dieses Spiel schnell 
seine Liebhaber finden wird. 
Wenn Sie sich also angesprochen 
fühlen, setzten Sie sich-mit- dem 
Hersteller .in Verbindung. Wir 
können dieses Programm allen 
Kung-Fu Freunden empfehlen 
und wünschen Ihnen viel Spaß! 





»Paperboy«-Adaption 
befindet sich in Vorbereitung 





Paperboy fährt schon bald auf dem C-16/116/+4 


Die interessanteste Nachricht er- 
reichte uns dann noch kurz vor 
Redaktionsschluß. Die Fa. King- 
soft hat von dem englischen 
Software-Haus Elite den Auftrag 
zur Adaption des C-64 Erfolges 
”Paperboy” erhalten. So ist in den 
nächsten Wochen mit der Veröf- 
fentlichung des bekannten Spiel- 
hallenrenners auch für die 
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C-16/116 und Plus 4 Besitzer zu 
rechnen. Uns kann es nur recht 
sein, daß auch diese Systeme im- 
mer mehr an Bedeutung gewin- 
nen und die Softwarehäuser er- 
kannt haben, daß hier ein außer- 
gewöhlich guter Rechner seine 
Liebhaber gefunden hat. Man darf 
also auf die Zukunft gespannt 
sein. 


Bei Kingsoft hat man sich nicht 
nur auf die Programmierung von 
Spielen beschränkt, man hat auch 
im Anwender-Bereich eine Viel- 
zahl von Programmen ent- 
wickelt. Ein Blick auf unser Bild 
zeigt uns insgesamt 6 verschiede- 
ne Anwenderprogramme 

Grafik Designer 

Music Master 

Turbo Tape 

Paintbox 

Micro Kalk und 

Mikro Datei ° 

die den User bei seiner täglichen 
Arbeit mit dem Computer unter- 
stützen sollen.. Da-wir Turbo Ta- 
pe bereits vorgestellt haben, 
möchten wir hier nicht versäu- 
men, ein paar Worte über die an- 
deren: Programme zu verlieren. 
Als da wäre zunächst das Pro- 
gramm ”Grafik-Designer. Mit 
Hilfe eines Editors können Sie 
hier Ihren eigenen Zeichensatz er- 
stellen. Dabei müssen Sie auch 
nicht auf so aufwendige Sachen 
wie Scrollen, Spiegeln, Invertie- 
ren, Drehen, um nur einige zu 
nennen, verzichten. Selbst eine 
Animation von mehreren Zei- 
chen ist möglich. Sie sehen also 
ein äußerst nützliches Programm. 
Aber auch Paintbox” ‘ein Mal- 
und Zeichenprogramm in 121 
Farben ist eine durchaus interes- 
sante Anwendung. Acht verschie- 
dene Pinsel bieten unterschiedli- 
che Anwendungsmöglichkeiten. 
So kann man z.B. Flächen füllen, 
Linien ziehen, Kreise, Rechtecke 
und Scheiben zeichen u.v.m. Die 
Steuerung erfolgt über Joystick 
oder Tastatur und im Test erwies 
sich die Handhabung als äußerst 
einfach und hinterließ einen posi- 
tiven Eindruck. 

Mit Musikmaster bekommt der 
C-16/116/Plus4 - User ein Pro- 
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gramm zur Verfügung gestellt, 
daß einen ebenso guten Musiker 
aus seinem System macht, wie 
man es von dem ”Großen Bruder 
C-64” gewohnt ist. Dieses Musik- 
programm verwandelt Ihr System 
in.einen fantastischen Synthesizer 
und Sequenzer. So können Sie ei- 
gene Musikstücke komponieren, 
abspeichern und später in selb- 
sterstellte Programme einbauen. 
Eine tolle Sache für jeden 
Musik-Fan! 
”Last but not least” sind da noch 
die beiden Programme ”Micro 
Datei”? und ”Mikro Kalk”. 
Micro-Datei: ist ein Dateiverwal- 
tungsprogramm mit dessen Hilfe 
Sie alle Arten von Daten verarbei- 
ten können. Dabei ist ein 
* freier Maskenaufbau, 
* das Sortieren nach beliebigen 
Kriterien 
* das Suchen von beliebigen Aus- 
drücken usw. 
garantiert. Die leichte Bedienbar- 
keit und der übersichtliche Auf- 
bau sind dabei von besonderer Be- 
deutung. 
Mit ”Mikro-Kalk” liegt ein lei- 
tungsstarkes Tabellenkalkulation- 
sprogramm vor, welches die täg- 
lich anfallenden Arbeiten (Haus- 
haltskasse, Einkauf-/Verkauf-Er- 
lös usw.) mit Pravour bewältigt. 
Vielfältige mathematische Funk- 
tionen, das Einfügen/Löschen 
von Spalten/Zeilen sowie das Ko- 
pieren von Formeln und Werten 
sind nur einige Vorzüge dieses 
Programms. ) 
Jeder der bei seiner täglichen Ar- 
beit mit Daten und Zahlen kon- 
frontiert wird, sollte diese Ange- 
bote genau studieren und das für 
Ihn passende bei seinen Problem- 
lösungen zu Hilfe nehmen. 


Weiter 5.39 


checeksummer 


Der Checksummer für alle C-16/116 - 
oder Plus 4-Besitzer! R 


Die Arbeitsweise des C-16/116 Checksum- 
mers entspricht weitgehend der VC-20- 
und C-64-Version und braucht deshalb 
nicht näher erklärt zu werden. Da auch der 
C-16/116 nicht den größten Speicher be- 
sitzt, wurde hier die Methode der VC-20- 
Version gewählt, und das Maschinenpro- 
gramm in den Kassettenpuffer gelegt. Dies 
hat den Vorteil, daß kein Basic-Speicher 
verlorengeht. Der Nachteil besteht darin, 
daß nach der Aktivierung des Checksum- 
mers keine Kassettenoperationen durch- 
geführt werden dürfen, da diese unweiger- 
lich zum Systemabsturz führen. Um die 
Kassettenoperationen wieder zuzulassen, 
muß der Checksummer durch die beiden 
folgenden SYS-Aufrufe abgeschaltet wer- 
den: 


SYS 62158 : SYS 33047 


Aktiviert wird der Checksummer mit SYS 
818. Die Funktion und Arbeitsweise ent- 
nehmen Sie bitte der C64-Checksummer- 
Version (siehe Ausgabe Computronic Nr. 


die zusätzlichen Steuerzeichen ’FLAS- 
HON?’ (CTRL-), und ’FLASHOFF’ (CTRL.) 
welche ebenfalls durch Klartext ersetzt 
werden (s. Tabelle Tastenbezeichnungen). 


Arbeitsweise und Aufbau unseres Check- 
summers: 
Unser Checksummer besteht aus einem 
kleinen Maschinenprogramm welches als 
Basic-Loader abgedruckt ist. 


Tippen Sie diesen Loader ein und spei- 
chern ihn auf Kassette oder Diskette, denn 
Sie können ihn zukünftig immer wieder 
benutzen. 


Der Start erfolgt durch den Befehl „RUN“. 
Nach kurzer Zeit meldet sich der Rechner 
mit der Meldung „TRONIC ..“. Der Check- 
summeristnun aktivundman kann ein be- 
liebiges Tronic-Listing eingeben. Vorher 
sollte der Checksummer mit dem Befehl 
„NEW“ gelöscht werden. Nachdem eine 
Zeile mit RETURN. abgeschlossen wird, 
erscheint links oben auf dem Schirm eine 
Prüfzahl. Vergleichen Sie diese mit der 


Zahl im Heft hinter der Zeile. Stimmt die 
Zahl überein, ist die Zeile richtig eingege- 
ben. 

Auf die Weise können Sie das gesamte 
Listing schnell und fehlerfrei eingeben. 


Interessant ist auch, daß bei der Eingabe 
von Zeilen die üblichen Abkürzungen be- 
nutzt werden können, ohne die Checksum- 
me zu verändern, Leerzeichen außerhalb 
von Anführungszeichen werden ignoriert, 
da diese auf die Ausführung der einzelnen 


. Befehle keinen Einfluß haben. Z 


Für alle, die nicht gerne abtippen, ist 
der Checksummer unter folgender Be- 
stellnummer zu beziehen: 


OV 10. K Kassette 10 DM 
OV 10. D Diskette 15 DM 





Achtung: nach dem Starten des Checksum- 
mers muß noch »NEW (RETURN eingege- 
ben werden. E 


3). Eine Ausnahme bei C-16/116 sind 


REM KREKHECKRERERREREREREERERRERHRERERER 
REM 

REM C16-CHECKSUMMER 

REM 

REM COPYRIGHT BY FRANK BRALL 
REM ; 

REM (C) 18.04.86 

REM 

REM KUH ER REEREERERHUHEERERKERUERENH 
10 PRINT"{CLEAR DOWN SPACE23 4404{SPACE2} 
CHECKSUMMER{SPAGCEFOESPACEI1.OTSPACE2? 44 
S4LDOHN?" 

11 PRINT" {SPACE2}44LSPACE2ICOPYRIGHTISPA 
CE>FRANKESPACE}BRALLTSPACES 4{DOUNS" 

12 PRINT" SPACES}FUER{SPACE}TRONIC-VERLA 
G" 

&0000 DIMH (75) :FORI=0T0? 

60010 H(48+1)=1:H(65+1)=I+10: NEXT 

60020 FORI= 818 TO 1010 :READA$ 

&0030 H=ASC(LEFT$(A$,1)) 

60040 L=ASC (RIGHTS (A$,1)) 

60050 D=H(H)*16+H(L) :S=S+D:POKEI,D 

60060 A=A+1: IFACZOTHENNEXT:A=-1 

60070 READV: Z=Z+1: IFV=STHENA0085 

60080 PRINT"DATAFEHLER{SPACE} INTSPACE}ZE 
ILE{SPACE} = "3 60200+Z: END 

60085 IFA<OTHEN60100 

60090 8=0:A=0:NEXT 

. 60100 PRINT" {DOUN23" 

60110 PRINT"CHECKSUMMERTSPACEFEINTSPACEI 
={SPACEISYSTSPACEIBIBTDOHNF" 

60120 PRINT"CHECKSUMMERTSPACEFAUS{SPACE} 
={SPACE}SYSISPACEI62158+SYS{SPACEF33047L 
DOUN?" 


SOoneuUPrüunn 
EZ SE SE ze Ze Zu 
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60130 PRINT" {DOUNISAVE/LOADTSPACEYISTISR 
ACE+WAEHREND{SPACE3DER{SPACEFICHECK-" 
60140 PRINT"SUMMER{SPACEIAKTIVISPACEYIST 
„ {SPACEINICHT{SPACEIMDEGLICHTSPACE} !" 
60150 PRINT" {DOHNF}BEACHTEN{SPACEISIETSPA 
CE>IDIE{SPACEIHINWEISETSPACEF INTSPACEFDEN 
" 


60170 PRINT"HEFTEN{SPACEICOMPUTE{SPACE>M 
IT{SPACEFUND{SPACEICOMPUTRONIC" 

60180 PRINT" {DOHNFVIELISPACEISPASSTSPACE 
3! {SPACE} (AUTOR: F. BRALL/644350NTRA) 
60190. POKE 814,147:PDKE815,251:POKE 816, 
147:POKE 817,251 

60195 SYS B18:END 

60201 DATA A?,3D,8D,02,03,A9,03,8D,03,03 
„60,A2,FF,86,3A4,20,5A,88,86,3B, 1851 
&0202 DATA 84,3C0,20,73,04,AA,FO,EF,90,09° 
‚20,53,89,20,79,04,4C,D9,8B,20, 2018 
60203 DATA 3E,8E,20,53,89,84,0B,A7,00,8D 
‚E4,03,8D,E5,03,8D,E6,03,18,A5, 2076 
60204 DATA 14,65,15,8D,E6,03,AO,FF,C8,Bi 
„3B,F0,20,C09,22,D0,0A,AD,E4,03, 2508 
60205 DATA 49,01,8D,E4,03,B1,3B,AE,E4,03 
‚„DO,04,09,20,F0,E4,EE,E5,03,AE, 2644 
60206 DATA ES,03,18,B1,3B,6D,E6,03,8D,E6 
‚03,CA,DO,F4,40,76,03,38,20,39, 2204 
60207 DATA D8,8E,E2,03,8C,E3,03,A2,00,A0 
‚00,18,20,39,D8,49,5B,20,D2,FF, 2365 
60208 DATA A9,00,AE,E6,03,20,5F ,A4,49,5D 
„20 ,D2,FF,20,08,FB,20,08,FB,AC, 2380 
60209 DATA E3,03,AE,E2,03,18,20,39,D8,A2 
„00,86, FF ,40,36,87,00,00,00,00, 1778 
60210 DATA 00,00,00,00,00,00,00,00,00,00 
„00,00,00, 0 
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Auf vielfachen Leserwunsch haben wir uns entschlossen, unser Druckverfahren für 
Commodore-Listings zu ändern. \ 

Steuerzeichen sowie alle Grafikzeichen werden zukünftig durch Klartext ersetzt. 
Der Ausdruck ist kompatibel zum bisherigen Druckverfahren, ein neuer Checksum- 
mer ist aus diesem Grund nicht erforderlich. 

Eingabehinweise für alle Commodore Rechner! 

Wer sich schon etwas näher mit den Commodore Rechnern befaßt hat, wird sicher- 
lich wissen, daß der Grafiksatz des C 64 sehr viele ähnliche Symbole enthält. Aus die- 
sem Grund ist es oft sehr schwer, einzelne Zeichen, wie zum Beispiel horizontale Li- 
nien, voneinander zu unterscheiden. Besonders macht sich dieser Nachteil in Listings 
bemerkbar, welche die Bildschirmgrafik mit PRINT-Zeilen aufbauen. 

Bisher haben wir in unserem Ausdruck lediglich die Steuersequenzen wie CTRL-RVS 
ON oder CTRL-BLUE durch Klartext ersetzt, ab dieser Ausgabe werden jedoch auch 
alle Grafikzeichen durch ein Schlüsselcode ersetzt. Durch diese Methode sind Ver- 
wechselungen praktisch völlig ausgeschlossen. 


Wie arbeitet unser Klartext? 

Wer schon nach dem alten Verfahren Programme eingegeben hat, wird sicherlich kei- 
ne Schwierigkeiten mit der Umstellung haben. 

Für die neu hinzugekommenen Leser erkläre ich jedoch das Verfahren noch einmal 
grundlegend. 

Alle sogenannten Steuerzeichen (z.B. eine Farbe) sowie ein Grafikzeichen, werden in 
unseren LISTINGS durch ein CODEWORT, welches die Taste bzw. Tastenkombi- 
nation’kennzeichnet, ersetzt. Eine Tabelle der Tastenfunktionen finden Sie in jedem 
Tronic-Magazin (z.B. Computronic o. Compute Mit). Das folgende Beispiel zeigt den 
Unterschied zwischen unserem alten und dem neuen Druckverfahren: 


C64 LISTING MIT CHECKSUMMEN (C V1.0) 


10 REM BISHERIGER AUSDRUCK <118> 
20 PRINT" CD — <52> 
30 PRINT"eI ——— I, “* <85> 
40 PRINT" a®rtal ” <149> 
50 PRINT"ENDE" <246> 


ENDE DES LISTINGS 
EDRUCK:F.B.] 


C-64 LISTING + CHECKSUMMEN (C V1.0) 


10 REM NEUER AUSDRUCK <162> 
20 PRINT"{DOHN4 SO CY9 SP}" <52> 
30 PRINT"(SA SB SC SD SE SF SG SH SI SJ SKY” <85> 
40 PRINT"{CA CB CC CD CE CE 663" <149> 
50 PRINT"ENDE" <246> 


- ENDE DES LISTINGS 
EDRUCK:F.B./0.5.3 


Wie in dem Beispiel zu erkennen ist, werden alle Steuertasten durch die entsprechen- 
de Tastenbeschreibung markiert. Das Wort DOWN steht in diesem Fall für Cursor 
nach unten. Die Zahl dahinter gibt an wie oft die Taste er muß. In unse- 
rem Beispiel müßte also die Taste CURSOR abwärts viermal betätigt werden. Die ge- 
naue Beschreibung, welche Taste gemeint ist, entnehmen Sie bitte der Klartext- 
Tabelle, welche am Ende dieser Beschreibung abgedruckt ist. Achtung für C16 und 
C64 existieren zwei verschiedene Tabellen! 

Wie ebenfalls aus dem Beispiel zu erkennen ist, werden auch alle Grafikzeichen durch 
einen 2-Buchstaben-Code ersetzt. Der erste Buchstabe ist entweder ein »S« oder ein 
»C«. Das »C« steht für die COMMODORE TASTE« und das »S« für die »SHIFT 
TASTE«. Der zweite Buchstabe bezeichnet die Aufschrift der Taste. Das »SA« in’un- 
serem Beispiel bedeutet also, daß die Taste SHIFT zusammen 'mit dem Buchstaben 
»A« betätigt werden muß. »C+« würde bedeuten, daß die Taste COMMODORE zu- 
sammen mit dem PLUS Zeichen gedrückt wird. Wird direkt hinter dieser Buchsta- 
benkombination eine Zahl angegeben, so gibt diese die Anzahl der jeweiligen Zeichen 
an. Das Zeichen COMMODORE Y wurde also in unserem Beispiel 9 mal eingege- 
gen. Durch diese Methode entfällt zukünftig das lästige Abzählen von mehrfachen 
Zeichen. 

Sollten Sie einmal nicht wissen, welche Taste gemeint ist, so hilft Ihnen ein Blick in 
unsere Klartext-Tabelle weiter. 

Um im Listing Tastenbezeichnungen von normalen Zeichen zu unterscheiden, wer- 
den alle Tastenkennzeichnungen in geschweifte Klammern gesetzt. Diese dürfen 
selbstverständlich nicht eingegeben werden. Auch Leerzeichen innerhalb geschweif- 
ter Klammern dienen nur zur Trennung einzelner Tastenfunktionen und dürfen 
ebenfalls nicht eingegeben werden. Um die Tastenfunktionen noch besser hervorzu- 
heben, werden diese in unterstrichener Kursivschrift (Schrägschrift) dargestellt.Alle 
ben außerhalb der geschweiften Klammern werden normal abgedruckt und auch 
eingegeben. 

Au En ersten Blick hört sich das sicher etwas kompliziert an, ist jedoch in der Praxis 
ganz einfach. Wenn man sich erst einmal an die in Klartext geschriebenen Zeichen 
gewöhnt hat, wird man den großen Vorteil dieser Schreibweise erkennen. 


Frank Brall 


Noch eine wichtige Anmerkung ! 

Aus technischen Gründen können drei Zeichen von unserm Ausgabegerät nicht ver- 
arbeitet werden. Diese Zeichen sind: Pfeil nach links, engl. Pfund, Pfeil nach oben 
— Steht für den Pfeil nach links 

\ Steht für das englische Pfund-Symbol 

* Steht für den Pfeil nach oben 


Klartext-Tabelle für Commodore 64 und VC 20 





DOWN CURSOR ABWÄRTS TASTE NEBEN RECHTEN SHIFT 
UP CURSOR HINAUF HIT-TASTE & TASE NEBEN 
RECHTEM SHIFT 

CLR CLEAR SCHIRM SHIEFT-TASTE & 2. TASTE GANZ RECHTS OBEN 
INST EINFÜGEN SHIFT-TASTE & TASTE GANZ RECHTS OBEN 
HOME CURSOR IN ECKE 2.TASTE VON GANZ RECHTS OBEN 
DEL DELETE . TASTE GANZ RECHTS OBEN 
RIGHT CURSOR RECHTS TASTE GANZ RECHTS UNTEN 
LEFT CURSOR LINKS SHIFT-TASTE & TASTE UNTEN RECHTS 
SPACE LEERZEICHEN LEERTASTE (GRÖSSTE TASTE) 
Fi FUNKTIONSTASTE FUNKTIONSTASTE Fi 
F2 FUNKTIONSTASTE FUNKTIONSTASTE F2 
F3 FUNKTIONSTASTE FUNKTIONSTASTE F3 
F4 EFUNKTIONSTASTE FUNKTIONSTASTE F4 
E5 FUNKTIONSTASTE EUNKTIONSTASTE E5 
F6 \ FUNKTIONSTASTE EUNKTIONSTASTE F6 
F7 FUNKTIONSTASTE FUNKTIONSTASTE F7 
F8 FUNKTIONSTASTE FUNKTIONSTASTE F8 
BLACK SCHWARZ CONTROL-TASTE & 1 
WHITE WEISS CONTROL-TASTE & 2 
RED ROT CONTROL-TASTE & 3 
CYAN TUERKIS CONTROL-TASTE & 4 
PURPLE PURPUR CONTROL-TASTE & 5 
GREEN GRUN CONTROL-TASTE & 6 

LUE BLAU CONTROL-TASTE & 7 
YELLOW GELB CONTROL-TASTE & 8 
RVSON INVERSE EIN CONTROL-TASTE & 9 
RVSOFF INVERSE AUS CONTROL-TASTE & 0 
ORANGE ORANGE COMMODORE-TASTE & 1 
BROWN BRAUN COMMODORE-TASTE & 2 
LIG.RED HELLROT COMMODORE-TASTE & 3 
DGREY DUNKELGRAU COMMODORE-TASTE & 4 
MGREY MITTELGRAU COMMODORE-TASTE & 5 
LIG.GREEN HELLGRÜN COMMODORE-TASTE & 6 
LIGBLUE HELLBLAU COMMODORE-TASTE & 7 
HGREY HELLGRAU COMMODORE-TASTE & 8 
CTRL... CTRL-ZEICHEN CONTROL-TASTE UND DAS ... ZEICHEN 
Sr GRAFIKZEICHEN SHIFT-TASTE UND DAS ... ZEICHEN 


LOHR GRAFIKZEICHEN COMMODORE-TASTE UND DAS ... ZEICHEN 
SHIFTSPACE UNSICHTBARER CODE SHIFT-TASTE UND SPACE 
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DOWN CURSOR ABWÄRTS TASTE NEBEN INST DEL; RECHTS OBEN 

UP CURSOR HINAUF 3. TASTE NEBEN DOWN VON RECHTS OBEN 
CLR CLEAR SCHIRM TASTE ÜBER RETURN ZUSAMMEN MIT SHIFT 
INST EINFÜGEN SHIFT-TASTE & TASTE GANZ RECHTS OBEN 
HOME CURSOR IN ECKE 2. TASTE VON GANZ RECHTS OBEN 

DEL DELETE TASTE GANZ RECHTS OBEN 

RIGHT CURSOR RECHTS 4. TASTE VON RECHTS OBEN 

LEFT CURSOR LINKS 5. TASTE VON RECHTS OBEN 

SPACE LEERZEICHEN LEERTASTE (GRÖSSTE TASTE) 

Fl FUNKTIONSTASTE FUNKTIONSTASTE Fi (VORHER DEFINIEREN; 
F2 FUNKTIONSTASTE EUNKTIONSTASTE F2 (VORHER DEFINIERE 
F3 EUNKTIONSTASTE FUNKTIONSTASTE F3 (VORHER DEFINIEREN) 
F4 FUNKTIONSTASTE FUNKTIONSTASTE F4 (VORHER DEFINIEREN) 
F5 FUNKTIONSTASTE FUNKTIONSTASTE F5 (VORHER DEFINIEREN) 
F6 EFUNKTIONSTASTE EUNKTIONSTASTE F6 (VORHER DEFINIEREN) 
F7 FUNKTIONSTASTE FUNKTIONSTASTE F7 (VORHER DEFINIEREN) 
F8 FUNKTIONSTASTE FUNKTIONSTASTE F8 (VORHER DEFINIEREN) 
BLACK SCHWARZ CONTROL-TASTE & 1 

WHITE WEISS CONTROL-TASTE & 2 

RED ROT CONTROL-TASTE & 3 

CYAN TUERKIS CONTROL-TASTE & 4 

PURPLE PURPUR CONTROL-TASTE & 5 

GREEN GRÜN CONTROL-TASTE & 6 

BLUE BLAU CONTROL-TASTE & 7 

YELLOW GELB CONTROL-TASTE & 8 

RVSON INVERSE EIN CONTROL-TASTE & 9 

RVSOFF INVERSE AUS CONTROL-TASTE & 0 

ORNG ORANGE COMMODORE-TASTE & 1 

BRN BRAUN COMMODORE-TASTE & 2 

YL.GN GELBGRÜN COMMODORE-TASTE & 3 

PINK SA-e- COMMODORE-TASTE & 4 

BL.GRN BLAUGRUN COMMODORE-TASTE & 5 

L.BLU HELLBLAU COMMODORE-TASTE & 6 

D.BLU DUNKELBLAU COMMODORE-TASTE & 7 

L.GRN HELLGRÜN COMMODORE-TASTE & 8 

CTRL .. CTRL-ZEICHEN CONTROL-TASTE UND DAS ... ZEICHEN 

Sie GRAFIKZEICHEN SHIFT-TASTE UND DAS ... ZEICHEN 

Ci GRAFIKZEICHEN COMMODORE-TASTE UND DAS ... ZEICHEN 
FLASHON BLINKEN EIN CONTROL-TASTE UND ",” 


FLASHOFF BLINKEN AUS CONTROL-TASTE UND ”" 
SHIFTSPACE UNSICHTBARER CODE SHIFT-TASTE UND SPACE 
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_kurs | 
Die Möglichkeiten des TED 


Ein kompletter Kurs in Grafik- und Soundprogrammierung 


Der im € 16/116 und Plus/4 ein- 
gebaute TED-Chip ist ein vielseit- 
ges Multitalent mit erstaunlichen 
Fähigkeiten. Die klassische Ge- 
waltenteilung, wie noch beim 
C-64 gegeben, wo der VIC für die 


Grafik, der SID für den Sound 
und der CIA für die Einga- 
be/Ausgabe zuständig ist, ist 
beim C 16/116 und Plus/4 aufge- 
hoben. Der TED vereint (fast) al- 
le diese Aufgaben in sich. Diese 
Artikelserie stellt dieses Geschenk 
des Himmels nun mit allen seinen 
Möglichkeiten ausführlich vor, 
indem sie sich mit allen wichtigen 
TED-Registern intensiv beschäf- 
tigt. Eine Ausnahme bildet aller- 
dings die Eingabe/Ausgabe-Pro- 
grammierung, die nicht Gegen- 
stand dieses Kurses sein soll 


(vielleicht ein andermal). Der 
Kurs richtet sich sowohl an die 
BASIC- als auch an die Maschi- 
nenprogrammierer und behan- 
delt schwerpunktmäßig die Gra- 
fikprogrammierung des TED. 
Die en’ Inhaltsübersicht 
dient dazu, Ihnen einen Über- 
blick über alle Themen des Kur- 
ses zu geben: 


Inhaltsübersicht 

1. Maskiertes POKEn 

2. Umschalten des CPU-Zugrif- 
fes zwischen RAM und ROM 

3. Die Grafikmöglichkeiten des 
TED 
I. Der Bitmap- und. der 
Multicolor-Modus (Listing 1) 
II. der Extended Color-Modus 
(Listing 2) 
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IH. Ein selbsterstellter Zeichen- 
satz (Listing 3) 

4. Zeitvorteile durch Abschalten 
des Bildschirmes 

5..Das Abfrageregister für Tasta- 
tur und Joystick 

6. Die Interruptmöglichkeiten 
des TED 
I. Das IMR und das IRR 
II. Die Timer des TED (Listing 


4) 
IN. _Der  Rasterzeilen-IRQ 
(Listing5) 


7. Softscrolling (Listing 6) 

8. Umschalten zwischen PAL- 
und NTSC-Norm 

9: 3 Hardware-Cursor (Listing 
7 

10.Die Soundmöglichkeiten des 
TED (Listing 8) 


C 16/116 
plus 4 


Maskiertes POKEn 

Bekanntlich besteht der Speicher 
eines Computers aus einzelnen 
Bytes, von denen jedes einzelne 
wiederum aus acht Bits (nume- 
riert von 0 bis 7) besteht. Ein Bit 
kennt zwei Zustände: 

1 = gesetzt und 0 = ungesetzt. 
Nun kann es vorkommen - und 
das wird im Laufe dieses Artikels 
mehrfach passieren -, daß man ein 
Bit oder auch mehrere Bits setzen 
oder löschen möchte bzw. muß, 
ohne jedoch den Zustand der 
übrigen Bits dieses Bytes in irgen- 
deiner Weise zu verändern. Nötig 
wird das hauptsächlich bei Regi- 
stern, wie sie in diesem Kurs ja be- 
schrieben werden sollen, wo. die 
einzelnen Bits - teilweise völlig 
unabhängig voneinander - be- 
stimmte Steuerfunktioen erfül- 
len. Für dieses sogenannte ”mas- 
kierte POKEn” kann man folgen- 
de Formel aufstellen: 


Will man beispielsweise Bit n (n 
aus dem Bereich von 0 bis 7) des 
Registers XXXX setzen, ist von 
BASIC aus folgender Befehl not- 
wendig: - 
POKE XXXX, 
PEEK(XXXX) OR (2fn) 


Will man dasselbe Bit löschen, ist 

folgender Befehl einzugeben: 
POKE XXXX, 
PEEK(XXXX) AND 
(255-21n) 


Es empfiehlt sich natürlich die 
Terme hinter den logischen Ver- 
knüpfungen in ausgerechneter 
Form anzugeben, da das die Be- 
fehlsausführung erheblich be- 
schleunigt. Will man mehrere 
Bits gleichzeitig löschen oder set- 
zen, so sind die Terme für die ein- 
zelnen Bits zu addieren. Ein Bei- 
spiel: 

POKE XXXX, 

PEEK(XXXX) OR 

(216+215+211) 
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setzt die Bits 6, 5 und 1 im Regi- 

ster XXXX auf 1. Zum Löschen; 
POKE XXXX, 
PEEK(XXXX) AND ° 
(255-(216+215+211)) 


löscht dieselben Bits in dem be- 
sagten Register, ohne den Zu- 
stand der übrigen Bits zu beein- 
flussen. Wenn in einem Register 
bestimmte Bits gelöscht und ande- 
re wiederum gesetzt werden müs- 
sen, so ist natürlich auch eine Ver- 
knüpfung beider Befehle möglich. 
Folgender Befehl löscht Bit O und 
setzt Bit 1 im Register XXXX: 
POKE XXXX, 
(PEEK(XXXX) AND 
(255-210)) OR (211) 


In diesem Zusammenhang noch 
ein Hinweis zu den im nachfol- 
genden Text verwendeten Zah- 
lenformaten. Um sowohl BASIC- 
als auch Maschinenprogrammie- 
rern gerecht zu werden, werden 
Zahlen bzw. Adressen grundsätz- 
lich sowohl dezimal als auch he- 
xadezimal - teilweise sogar binär - 
dargestellt. Dezimale Zahlenanga- 
ben haben deshalb entweder kei- 
ne besondere Kennzeichnung 
oder sind mit ”dez.” gekennzeich- 
“net, hexadezimale Zahlen mit 
”48” und ”hex.” bzw. hexadezi- 
male Adressen mit ”$” und binäre 
Zahlen mit ”# %” und ”bin.”. 


Umschalten des CPU-Zugriffs 
zwischen ROM und RAM 

Wie sicherlich viele unter den Le- 
sern wissen, macht der C16 zur 
Verwaltung seines Speichers von 
der Technik des Bank-Switchings 
Gebrauch. Das heißt nichts wei- 
ter, als daß beim C16 ”ständig” 
zwischen dem Festwertspeicher, 
ROM, und dem Anwenderspei- 
cher, RAM, hin- und hergeschal- 
tet wird und so die CPU Daten 
sowohl aus dem ROM als auch 
aus dem RAM lesen kann. Be- 
trachtet man jedoch den Speicher 
des C16, so wirkt diese relativ auf- 
wenige Technik der Speicherver- 
waltung wie die reinste . Ver- 
schwendung; um 16 KByte 
RAM- und 32 KByte ROM-Spei- 
cher zu verwalten, bedarf es bei 
einer 8-Bit-CPU, wie sie mit dem 
7501. im C16 integriert ist, wirk- 
lich keines Bank- Switchings. Der 
7501 kann völlig ohne Tricks von 
Haus aus 64 KByte Speicher 
adressieren. Des Rätsels Lösung 
findet man leicht, angesichts der 
zahlreichen Speichererweiterun- 
gen, die seit einiger Zeit für den 
C16 angeboten werden. Ganz un- 
kompliziert läßt sich der C16 
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nämlich auf 64 KByte hochrü- 
sten. Der C16 ist schon ab Werk 
auf einen solchen: 64 KByte- 
Betrieb vorbereitet. Es müssen 
praktisch nur zwei Speicherbau- 
steine ausgewechselt werden, und 
schon haben Sie aus dem C16 eine 
64 KByte-Maschine gemacht. Um 
Mißverständnissen vorzubeugen: 
durch Aufrüsten des Speichers 
wird der C16 nicht kompatibel zu 
”seinem großen Bruder C64”! 
Warum Commodore diesen Ein- 
griff nicht gleich beim Zusam- 
menbau des C 16 vornimmt, ist 
noch nicht ganz geklärt: entwe- 
der wollte man Verwechselungen 
mit dem C64 vermeiden oder 
aber dem Plus/4 nicht das Wasser 
abgraben; denn für den Plus/4 
gilt folgende einfache Formel: 
Plus/4 = C16 + 64 KByte RAM 
+ Userport + eingebaute Soft- 
ware, 


Bei einem auf 64 KByte RAM 
hochgerüsteten C16 wird Sinn 
und Zweck des Bank-Switching 
schnell klar: der Prozessor des C 
16 kann unmöglich 96 KByte 
Speicher (64 KByte RAM + 32 
KByte ROM) auf einmal adressie- 
ren, Man bedient sich daher eines 
Tricks und greift nacheinander 
auf das RAM und das ROM zu. 
Per Bank-Switching schaltet man 
also zwischen einer ROM- und ei- 
ner RAM-Bank um. 


Um dem Anwender zu ermögli- 
chen, Daten sowohl aus dem 
RAM als auch aus dem ROM zu 
lesen, “existieren im‘ TED zwei 
Schaltregister. Es sind dies die Re- 
gister 62 (dez. 65342 / hex. 
$FF3E) und 63 (dez. 65343 / hex. 
$FF3F). Bei beiden Registern han- 
delt es sich um Nur-Schreib-Spei- 
cher, das heißt, daß das Auslesen 
dieser Speicherzellen keine sinn- 
vollen Werte liefert. Erst das Hin- 
einschreiben eines (beliebigen) 
Wertes zeigt Wirkung: schreibt 
man in das Register 62, wird die 
ROM-Bank : aktiviert, so daß 
nachfolgende Leseoperationen 
immer den Inhalt des ROM |lie- 
fern; entsprechend wird durch 
das Beschreiben des Registers 63 
die RAM-Bank selektiert. Bevor 
Sie nun versuchen, in diesen Regi- 
stern herumzupoken, bedenken 
Sie folgendes: das gesamte 
Betriebssystem des C16 befindet 
sich im ROM. Deshalb wird beim 
Einschalten automatisch die 
ROM-Bank aktiviert. Wenn Sie 
nun von Basic aus in das Register 


63 schreiben (per POKE-Befehl), 
also RAM selektieren, wird das 
ROM und damit-das gesamte Be- 
triebssystem sofort ausgeblendet. 
Und ohne die Steuerung durch 
das Betriebssystem muß der C16 
unweigerlich abstürzen. Ein Um- 
schalten zwischen ROM und 
RAM kann also nur innerhalb ei- 
ner Maschinenroutine sinnvoll 
sein, solange diese nicht auf 
ROM-Berriebssystemroutinen 
zugreift. 

Für den Ablauf eines eigenen Ma- 
schinenprogrammes ist das Be- 
triebssystem nämlich nicht not- 
wendig. 


Die Grafikmöglichkeiten des 
TED 


Neben dem nach dem Einschal- 
ten des Computers vorliegenden 
Normalmodus verfügt der TED- 
Chip noch über drei weitere Gra- 
fikmodi, die im folgenden be- 
schrieben. werden sollen. Es han- 
delt sich dabei im einzelnen um 
den Extended Color-Modus, den 
einfachen Bitmap-Modus und den 
Multicolor-Modus, 


Der Bitmap- und der 
Multicolor-Modus 

Die beiden letzteren lassen sich 
dabei auf die Ihnen mit Sicheheit 
bekannte Weise über den 
Graphic-Befehl ansprechen. Diese 
beiden Modi werden durch Set- 
zen eines Bits im TED-Register 6 
bzw. 7 (Adressen $ FF06, dez. 
65286 - und $ EF07, dez. 65287) 
eingeschaltet (genau das macht 
auch der Graphic-Befehl). Beim 
Bitmap-Modus ist das Bit 5 des 
TED-Registers 6, beim Multi- 
color-Modus zusätzlich das Bit 4 


des TED-Registers 7 zuständig, 


d.h. beim Multicolor-Modus 
müssen auf jeden Fall beide Bits 


Bits 3 - 5 des TED-Reg. 18 
(Adresse Bits 13 - 15) 
000 


001 
010 
011 
100 
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gesetzt sein. Der Graphic-Befehl 
schaltet aber nicht nur die ent- 
sprechenden Grafikmodi ein, 
sondern legt auch die Anfangs- 
adresse des Bitmap-RAMss fest. 


Dies geschieht über die Bits 3 und 
5 des TED-Registers 18 (Adr. $ 
FF12, dez. 65298), die die drei 
höchstwertigsten Bits, d. h. die 
Bits 13 und 15, der Adresse des 
Bitmap-RAMs enthalten. Die 
Adtress-Bits 0 bis 12 haben also 
den unveränderbaren Wert 0. 
Durch den Graphic-Befehl wird 
in diese drei;höchstwertigsten Bits 
der Wert #%: 001. (binär) ge- 
schrieben und damit die Adresse 
für das Bitmap-RAM mit $ 2000 
(dez. 8192) festgelegt. Eine andere 
Möglichkeit existiert in der 
Grundversion des C 16/116-auch 
gar nicht, da das Setzen eines der 
beiden höchstwertigsten Adress- 
Bits auf jeden Fall eine Bitmap- 
RAM-Adresse ergibt, die größer 
als $ 3FFF (dez. 16383) ist und so- 
mit außerhalb des zur Verfügung 
stehenden RAM-Speicherberei- 
ches liegt. Die Bitmap-RAM- 
Adresse für $ 0000 festzulegen (d. 
h. alle drei höchstwertigsten Bits 
zu löschen), kommt natürlich 
überhaupt nicht in Frage, da die 
Zero-Page (Speicherstellen $ 0000 
bis $ 00FF) vom Betriebssystem 
und "Basic-Interpreter genutzt 
werden und vor dem Bitmap- 
RAM noch das Farbram und die 
Luminanztabelle liegen müssen. 


Das Bitmap-RAM läßt sich also 
nur bei einem erweiterten C 
16= 116 bzw. beim Plus/4 frei im 
Speicher verschieben. Zur Orien- 
tierung dient folgende kurze Ta- 
belle, die zu jeder Konstellation 
der drei höchstwertigsten Adress- 
Bits die entspechende Position des 
Bitmap-Rams im Speicher angibt: 


Die Adresse des Bitmap-RAMs 
$ 0000 (dez. 0) - nicht möglich 
$ 2000 (dez. 8192) - normal 

$ 4000 (dez. 16384) 

-$ 6000 (dez. 24576) 

$ 8000 (dez. 32768) 


101 $ A000 (dez. 40960) 


110 


$ C000 (dez. 49152) 


111 $ E000 (dez. 57344) 





Tabelle 1 


Normalerweise bezieht der TED 
alle seine Grafikinformationen 
aus dem ROM. Im Falle einer 
Hires-Grafik liegen diese aber im 


Compute mib 


RAM, so daß dem TED noch 
mitgeteilt werden muß, daß er sei- 
ne Grafikinformationen aus dem 
RAM beziehen soll. Dies geht 


kurs 
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über ein spezielles Umschaltebit, 
das sich RAM/ROM. Bank-Bit 
nennt. Es handelt sich dabei um 
Bit 2 im TED-Register 18 (Adr. $ 
FF12, dez. 65298). Ist es gesetzt, 
so wird vom TED das ROM, ist 
es gelöscht, so das RAM ange- 
sprochen. Damit ist es auch mög- 
lich beim erweiterten C 16/116 
bzw. Plus/4 eine Grafik unter das 
ROM zu legen. Das Umschalten 
von ROM auf RAM erledigt der 
Graphic-Befehl selbstverständlich 
auch. Wollen Sie ein unter das 
ROM gelegtes Bitmap-RAM von 
Maschinensprache aus bearbeiten, 
so müssen Sie noch durch Setzen 
eines Wertes im TED-Register 63 
(siehe vorhergehenden Artikelab- 
schnitt) dafür sorgen, daß auch 
die CPU auf das RAM zugreift. 
Die Grafikroutinen des Basic- 
Interpreters können Sie eh nur 
verwenden, wenn Sie diese ins 
RAM kopieren und dort in der 
Unterroutine ”Bytezeiger setzen” 
(Adr. $ C291) die Basicadresse des 
Bitmap-RAMs in $ C2A9 modifi- 
zieren. Als das zum Bitmap-RAM 
gehörende Farbram fungiert im- 
mer das Videoram. Damit aber 


Bits 3-7 des 
Videorams 
00000 
00001 
00010 
00011 
00100 
00101 
00110 
00111 
01000 
01001 
01010 
01011 
01100 
01101 
01110 
01111 
10000 
10001 
10010 
10011 
10100 
10101 
101109 
10111 
11000 
11001 
11010 
11011 
11100 
11101 
11119 
11111 


nicht durch das Arbeiten im 
Bitmap- bzw. Multicolor-Modus 
die Informationen im ”norma- 
len” Videoram (womit das Video- 
ram ab Adresse $ 0C0O -dez. 
3072-, wie im Einschaltzustand 
gegeben, gemeint ist) zerstört 
werden, muß auch das Videoram 
zunächst an eine neue Stelle im 
Speicher verschoben und nach 
dem Abschalten des Bitmap- 
Modus’ wieder an die alte Adresse 
zurückgeschoben werden. Ahn- 
lich wie das Bitmap-RAM läßt 
sich also auch das Videoram ver- 
schieben, und zwar über die Bits 3 
bis 7 (Adress-Bits 11 bis 15 des Vi- 
deorams) im TED-Register 20 mit 
der Adresse $ FF14 (dez. 65300). 
Aus den gleichen auch schon 
beim Bitmap-RAM angegebenen 
Gründen sind natürlich nicht alle 
Adressen möglich. Durch den 


Graphic-Befehl wird das Video- ' 


ram ab Adresse $ 1000 (dez. 7168), 
also direkt vor dem Bitmap-RAM 
installiert. Auch hier ie eine 
Übersicht der Adressen des Vide- 
orams in Abhängigkeit von dem 
Wert der fünf höchstwertigsten 
Adress-Bits: 


Adresse des TED-Reg. 20 


$ 0400 (dez. 1024) 
$.0C00 (dez. 3072) 
$ 1400 (dez. 5120) 

$ 1C00 (dez. 7168) 
$ 2400 (dez. 9216) 

$ 2C00 (dez. 11264) 
$ 3400 (dez. 13312) 
$ 3C00 (dez. 15360) 
$ 4400 (dez. 17408) 
$ 4C00 (dez. 19456) 
$ 5400 (dez. 21504) 
$ 5C00 (dez. 23552) 
$ 6400 (dez. 25600) 
$ 6C00 (dez. 27648) 
$ 7400 (dez. 29696) 
$ 7C00 (dez. 31744) 
$ 8400 (dez. 33792) 
$ 8C00 (dez. 35840) 
$ 9400 (dez. 37888) 
$ 9C00 (dez.. 39936) 
$ A400 (dez. 41984) 
$ AC00 (dez. 44032) 
$ B400 (dez. 46080) 
$ BC00 (dez. 48128) 
$ C400 (dez. 50176) 
$ CC00 (dez. 52224) 
$ D400 (dez. 54272) 
$ DC00 (dez. 56320) 
$ E400 (dez. 58368) 
$ EC00 (dez. 60416) 
$ F400 (dez. 62464) 
$ FC00 (dez. 64512) 
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Da Bit 10 der Videoram-Adresse 
also immer gesetzt ist (die Bits O 
bis 9 sind immer 0), wäre die erst- 
mögliche Adresse theoretisch $ 
0400. 

Diese Adresse kommt aber aus 
den. auch schon beim Bitmap- 
RAM genannten Gründen nicht 
in Frage, so daß die im Einschalt- 
zustand gegebene Adresse $ 0C0O 
die erstmögliche Position für das 
Videoram darstellt. Nun soll 
noch kurz geklärt werden, wa- 
rum eine Hires-Grafik überhaupt 
so viel Speicherplatz, nämlich et- 
wa 10 Kilobyte, in Anspruch 
nimmt. Wie Sie sicherlich wissen, 
hat der C 16/116 bzw. Plus/4 ei- 
ne Grafikauflösung von 320 x 200 
= 64000 Punkten. Die Zustände 
von acht Punkten (gesetzt oder 
nicht gesetzt) lassen sich jeweils in 
einem Byte zusammenfassen. Da- 
mit werden 64000 / 8 Bytes = 
8000 Bytes allein für das Bitmap- 
RAM benötigt. Weitere 1000 By- 
tes (25 Zeilen X 40 Spalten) wer- 
den für das Farbram gebraucht 
und ebenfalls noch einmal 1000 
Bytes für die Luminanztabelle, 
die beim Einschalten des Hires- 
Modus ab Adresse $ 1800 (dez. 
6144), also direkt vor dem Far- 
bram liegt (das ist automatisch 
immer der Fall). Beim Multico- 
lor-Modus wird die Auflösung in 
X-Richtung auf 160 Punkte ver- 
kürzt, weil jetzt jeweils zwei Bits 
für einen Grafikpunkt nötig sind, 
da ja auch die Farbinformation 
enthalten sein muß. Mit zwei Bits 
lassen sich 212 = 4 Zustände dar- 
stellen (00, 01, 10, 11) ‚so daß ein 
Punkt vier verschiedene Farben 
(allerdings die Hintergrundfarbe 
eingeschlossen) innerhalb eines 
Zeichenbereiches (8 x 8 = 64 
Punkte) annehmen kann. Die Be- 
handlung des Bitmap- und des 
Multicolor-Modus von Basic aus 
ist relativ einfach und komforta- 
bel. Wie Sie auch von Maschinen- 
sprache her unter Ausnutzung 
der gegebenen Grafikroutinen im 
Basic-ROM mit Hires-Grafiken 
arbeiten können, soll anhand von 
Listing 1 gezeigt werden. In diese 
Listing wird die Handhabung al- 
ler wichtigen Grafikroutinen de- 
monstriert, d. h. es werden die an 
die Grafikroutinen zu überge- 
benden Parameter und die Ein- 
sprungadressen in mehreren hin- 
tereinandergehängten Beispielen 
vorgeführt. 

Alles weitere ist der Kommen- 
tierung des im Basic-Loader inte- 
grierten Assemblerlistings zu ent- 
nehmen. 


Der Extended Color-Modus 


Eine interessante Fähigkeit des 
TED ist der Extended Color- 
Modus. In ihm läßt sich jedes Zei- 
chen auf dem Bildschirm in einer 
eigenen Hintergrundfarbe darstel- 
len. Allerdings stehen in diesem 
Modus nur noch sechs Bits für die 
Zeichendefinition zur Verfügung, 
da die beiden höchstwertigsten 
Bits zur Festlegung der Hinter- 
grundfarbe herangezogen wer- 
den. Mit sechs Bits lassen sich 
aber nur noch 216 = 64 Zeichen 
definieren. 


Da es sich bei diesen sechs Bits um 
die sechs niederwertigsten Bits 
handelt, sind es also die ersten 64 
in der Bildschirmcode-Tabelle 
(s. HB. $. 216f) angebenen Zei- 
chen. Zwei Bits ergeben vier mög: 
liche Hintergrundfarben, die in 
den TED-Registern 21 (Adr. $° 
FF15, dez. 65301) bis 24 (Adr. $ 
FF18, dez. 65304) festgelegt sind. 


In diesem Zusammenhang soll 
auch das TED-Register 25 (Adr. $ 
FF19, dez. 65305), das die Rah- 
menfolge festlegt, nicht uner- 
wähnt bleiben. Die niederwertig- 
sten vier Bits, d. h. die Bits 0 bis 3, 
in diesen fünf Registern legen den 
Farbwert fest, de Bits 4 bis 6 die 
Luminanz und Bit 7 ist ungenutzt 
(im Farbram ist Bit 7 dann ge- 
setzt, wenn das Zeichen blinkend 
erscheinen sol). 

Über den Color-Befehl lassen sich 
unglücklicherweise nur die ersten 
beiden und das letzte der erwähn: 
ten fünf Register ansprechen. Ist 
der erste Parameter des Color- 
Befehles 0, so wird der folgende 
Farb- und Luminanzwert in das 
TED-Register 21, ist er 3, dann in 
das TED-Register 22 und bei 4 in 
das TED-Register 25 geschrieben. 
In die Register 23 und 24 müssen 
Farb- und Luminanzwert also mit 
PORE gesetzt werden. Dabei ist 
zu beachten, daß vom gewünsch- 
ten Farbwert 1 abgezogen und 
der Luminanzwert mit 16 multi- 
pliziert (da ja die höchstwertig- 
sten Bits 4 bis 6 diesen Wert festle- 
gen) hinzuaddiert werden muß. 
Da, wie bereits erwähnt, im Ex- 
tended Color-Modus nur noch 64 
verschiedene Zeichen zur Verfü- 
gung stehen, entsprechen die Bild- 
schirmcodes 0 bis 63 diesen ersten 
64 Zeichen mit der Hintergrund- 
farbe im TED-Register 21, die 
Bildschirmcodes 64 bis 127 ent- 
sprechend den ersten 64 Zeichen 
mit der Hintergrundfarbe im 
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REN BB BHRBBSBRHISHHHIHIHIHII IH IHIEIEAEHE 
REM * 
REM NUTZUNG DER GRAFIKROUTINEN # 
REM VON MASCHINENSPRACHE AUS %* 
REM #: * 
REM 1986 BY D.D.+W. .. 
REM #*- r * 
REM KREIEREN 


E 

PRINT"MACHTUNG: BASIC-LOADER LOESCHT SICH" 
PRINT"SELBST!"=PRINT"WEITER MIT BELIEBIGER TASTE." 
GETKEYT$:PRINT"WBITTE KURZ WARTEN!" 
FORA=1630T01897: READD: P=P+D:POKEA,D: NEXT 

IFP< >28727THENPRINT"BFEHLER IN DEN DATA-ZEILEN!"sEND 
FORT=1T020: PRINT"®":NEXT 

PRINT"STARTEN MIT SYS 1630. ":NEW 


: ! 
REM ALLE PARAMETER BEZIEHEN SICH AUF DEN MULTICOLOR-MDDUS, D.H. DIE 
REM X-WERTE SIND IMMER KLEINER ALS 160. 


* FARBPARAMMETER SETZEN UND GRAFIK INITIALISIEREN (COLOR & GRAPHIC) * 


DATA159 ,66 2 LDA #842 " FARBEs 2 (ROT) 7 LUMINANZ: A 
DATA133,134 ® STA $86 IN FARBREGISTER #1 SCHREIBEN 
DATA169,83 ® LDA #$53 FARBEs 3 (CYND 7 LUMINANZ: 5 
DATA133,133 ® STA $85 IN FARBREGISTER #2 SCHREIBEN 
DATA1659,100 . LDA #$64 FARBEs 4 (PUR) 7 LUMINANZ: & 
DATA141,22,255.: STA $FFi16 IN FARBREGISTER #3 SCHREIBEN 
DATA1652,4 . LDX #304 GRAFIKMODUS 4 (MULTICOLOR+TEXT) 
DATAS2,216,197 = JSR $C5D8 ==> GRAFIK INITIALISIEREN 


® 

* SCENELR (SCREEN CLEAR) * 

DATA32,127,197 s JSR $C57F ==> GRAFIKBILDSCHIRM LOESCHEN 
® 

* LINIE BZW. PUNKT ZEICHNEN (DRAW) * 


° 
DATA169,1 


LDA #$01 FARBREGISTER #1: ALS AKTUELLE 
STA $84 ZEICHENFARBE SELEKTIEREN 

LDA #$00 

STA $02AD STARTKOORDINATEı X-LO-BYTE 
STA £02AE X-HI-BYTE 
DATA141,175,2 STA $O2AF Y-LO-BYTE 
DATA141,176,2 STA $02BO Y-HI-BYTE 


: 
DATA133,132 2 
: 
s 
"B 
DATA169,48 8 LDA #$30 
® 
s 
s 
s 
Lj 
® 
[3 


"DATA169,0 
DATA141,173,2 
DATA141,174,2 


DATA162,0 LDX #$00 

DATA141,177,2 STA $02Bi1 ZIELKODRDINATE s X-LO-BYTE 
DATA142,178,2 STX $02B2 X-HI-BYTE 
DATA169,32 LDA #$20 1. 

DATA141,179,2 STA $02B3 Y-LO-BYTE 
DATA142,180,2 STX $02B4 Y-HI-BYTE 
DATA32,218,192 JSR $CODA START- UND ZIELKOOR. VERBINDEN 
s 

* KREIS ZEICHNEN (CIRCLE) * 

2 

DATA169,2 
DATA133,132 
DATA169,80 
DATA162,0 
DATA141,204,2 
DATA142,205,2 
DATA169,48 
DATA141,206,2 
DATA142,207,2 
DATA169,16 LDA #$10 

DATA141,208,2 STA $02D0 X-RADIUSs LO-BYTE 


D LDA #$02 FARBRREGISTER #2 ALS AKTUELLE 

° 

® 

® 

° 

s 

® 

® 

8 
DATA142,209,2 -: STX $02D1 HI-BYTE 

s ” 

° 

D 

I 

® 

® 


STA 584 ZEICHENFÄRBE SELEKTIEREN 
LDA #$50 

LDX #$00 

STA $02CC MITTELPUNKTKOOR. s X-LO-BYTE 
STX $02CD X-HI-BYTE 
LDA #330 

STA $02CE Y-LO-BYTE 
STX $O2CF Y-HI-BYTE 


DATA169,32 LDA #$20 

DATA141,210,2 STA $02D2 V-RADIUS: LO-BYTE 

DATA142,211,2 STX $02D3 HI-BYTE 
DATA142,216,2 STX $02D8 . STARTWINKEL : LO-BYTE (=0) 
DATA142,217,2 STX $02D97 HI-BYTE (=0) 
DATA142,218,2 STX $02DA ENDWINKEL : LO-BYTE (=0) 
DATA142,219,2 STX $02DB HI-BYTE (=0) 
DATA142,212,2 STX $02D4 DREHWINKEL z LO-BYTE (=0) 
DATA142,213,2 STX $02D5 HI-BYTE (=0) 
DATA169,2 LDA #$02 SCHRITTWEITE (BESTIMMT DIE LAENGE 
DATA133,233 STA $E? DER KREISSEGMENTE) AUF 2 SETZEN 
DATA32.101,192 JSR $C065 KREIS ZEICHNEN 


Listing 1, 1. Teil 
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TED-Register 22 usw.. Es gelten 
also folgende Zuordnungen: 


(siehe Tabelle 3) 


Einschalten läßt sich der Exten- 
ded Color-Modus durch Setzen 
von Bit 6 im TED-Register 6 
(Adr. $ FF06, dez. 65286). Listing 
2 soll den. Umgang mit diesem 
Grafikmodus demonstrieren. 


Ein selbsterstellter Zeichensatz 


Der TED-Chip bietet die Mög- 
lichkeit, sich seinen eigenen Zei- 
chensatz zu erstellen. Diese wird 
von vielen professionellen Spielen 
genutzt, da das Arbeiten mit un- 
definierten Zeichen große Ge- 
schwindigkeitsvorteile gegenüber 
dem Hires-Modus einbringt. 
Normalerweise bezieht der TED 
seine Zeicheninformationen aus 
dem Character-ROM, das von 
Adresse $. D000 (dez. 53248) bis 
Adresse $ D7FF (dez. 55295) liegt. 
Im Character-ROM sind die Zei- 
chendefinitionen für 128 ASCII- 
Zeichen jeweils für den Groß- 
schrift/Grafikzeichen- und den 
Kleinschrift/Großschrift-Modus 
gespeichert, und zwar in der Rei- 
henfolge, wie sie in der Bild- 
schirmeode-Tabele auf S. 
216/217 im Handbuch angegeben 
ist. Die dazu entsprechenden re- 
versen Zeichen mit den Bild- 
schirmcodes 128 bis 255 werden 
handwaremäßig erzeugt. Jedes 
Zeichen im Character-ROM be- 
ansprucht ‚acht Bytes, da ein Zei- 
chen aus 8x 8 = 64 Punkten zu- 
sammengesetzt ist, wovon sich je- 
weils acht Punkte in einem Byte 
(= 8 Bits) zusammenfassen lassen. 
Jedes Byte steht dabei für eine 
Punktzeile des Zeichens, wobei 
ein gesetztes Bit auch einem ge- 
setzten Punkt entspricht. Wollen 
Sie also ein eigenes Zeichen defi- 
nieren, so müssen Sie das Zeichen 
zunächst in einem 8 x 8-Raster er- 
stellen und dann für jede Zeile 
den aus den gesetzten Punkten (= 
Bits) resultierenden Byte-Wert er- 
rechnen. Das soll am Beispiel des 
Buchstaben A, der in der Bild- 
schirmcode-Tabelle das zweite 
Zeichen und im Character-ROM 
en Adr. $ D008 (dez. 
53256) abgelegt: ist, gezeigt wer- 
den. Das Porkeer für den 
Buchstaben A sähe also wie folgt 
aus (ein Stern (*) markiert immer 
einen gesetzten Punkt): 


(siehe Tabelle 4) 
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® 
* VIERECK ZEICHNEN (BOX) * 


nen es sich um die Adress-Bits 10 
bis 15 des Zeichensatzes handelt, 


: lich, ir : 
DATA169,112 LDA #570 möglich nn a h beim 
DATA162,0 LDX #500 Bitmap-RAM haben auch hier 
DATA141,204,2° STA $02CC LINKE OBERE ECKE = X-LO-BYTE wieder die _niederwertigsten 


STX 
LDA 


DATA142,205,2 
DATA16597,80 
DATA141 ,206,2 
DATA142,207,2 
DATA169,144 


B) 
: 
® 
s #550 
L 
® 
s 

DATA141,216,2 3 
s 
D 
8 
. 
® 
° 


STX 
LDA #$90 


DATA142,217,2 
DATA169,112 
DATA141,218,2 
DATA142,219,2 
DATA141,208,2 
DATA142,209,2 
DATA162,1 
DATA32,2,187 


STX 
LDA #370 
STA 
STX 


STX 
LDX 
JSR 


$02D 
#501 


* FLAECHE AUSFUELLEN (PAINT) * 


DATA169,3 
DATA133,132 
DATA169,80 
DATA162,0 
DATA141,173,2 
DATA142,174,2 
DATA169,48 
DATA141,175,2 
DATA142,176,2- 
DATA1L62,1 
DATA32,230,184 


LDA 
STA $84 
LDA #$50 
LDX #$00 
STA 
STX 


STX 
LDX 
JSR 


#01 


m 1 a ne de os 


* TEXT IN GRAFIKBILDSCHIRM SCHREIBEN 


DATA169,1 
DATA133,132 
DATA141,218,2 


LDA #$01 
STA $84 


#503 


$02CD 


STA $02CE 
$O2CF 


STA $#02D8 
$02D9 


$02DA 
$02DB 
STA $02DO 


4 


$BBO2 


$O2AD 
$O2AE 
LDA #330 
STA $O2AF 
$02BO 


$BBE6 


STA $02DA 


RECHTE UNTERE ECKE: 


X-HI-BYTE 


Y-L0-BYTE 
Y-HI-BYTE 


X-LO-BYTE 
X-HI-BYTE 


Y-LO-BYTE 
Y-HI-BYTE 


DREHWINKEL 2 LO-BYTE 


HI-BYTE 


FLAG FUER FLAECHE AUSFUELLEN SETZEN 
VIERECK ZEICHNEN 


FARBREGISTER #3 ALS AKTUELLE 
ZEICHENFARBE SELEKTIEREN 


STARTWERT 3 


X-LO-BYTE 
X-HI-BYTE 


Y-LO-BYTE 
Y-HI-BYTE 


FUELLMODUS AUF EINS SETZEN 
FLAECHE AUSFUELLEN 


(CHAR) # 


FARBREGISTER #1 ALS AKTUELLE 
ZEICHENFARBE SELEKTIEREN 
AKTUELLE SPALTE = 1 


Adress-Bits, d. h. in diesem Fall 
die Bits O bis 9, den festen Wert 0. 
Auf eine Tabelle mit den ver- 
schiedenen Bitkonfigurationen 
und den zugehörigen Adressen 
des Zeichensatzes wurde hier we- 
gen der Vielzahl der Möglichkei- 
ten (nämlich genau 216 = 64) ver- 
zichtet. Vermutlich stellt es Sie 
aber auch nicht vor allzu große 
Probleme, die zur gewünschten 
Zeichensatzadresse benötigte Bit- 
konfiguration selbst herauszufin- 
den. Ist die Zeichensatzadresse ge- 
ändert, so muß dem TED noch 
mitgeteilt werden, daß er die Zei- 
chendefinitionen nicht mehr aus 
dem ROM, sondern aus dem 
RAM beziehen soll. Dazu wird 
das schon erwähnte RAM/ROM 
Bank-Bit (Bit2) im TED-Register 
18 gelöscht. Damit wäre also der 
neue Zeichensatz eingeschaltet. 
Eine weitere interessante Fähig- 
keit des TED darf in diesem Zu- 
sammenhang nicht unerwähnt 
bleiben. Normalerweise lassen 


sich auf diese Art nur 128 Zeichen 
selbst definieren, da, wie bereits . 
gesagt, die reversen Zeichen hard-‘ 
waremäßig erzeugt werden.D.h., 
wenn Bit 7 im Bildschirmcode ei- 
nes Zeichens gesetzt ist, so wird 
dieses automatisch vom TED als 
reverses Gegenstück desselben 
Zeichens mit nicht gesetztem Bit 
7 interpretiert und dementspre- 
chend dargestellt. Dieses Verhal- 
ten des TEDs läßt sich aber durch 
Setzen des Bits 7 im TED-Register 
7 (Adr. $ FE07, dez. 65287) än- 
dern. Dieses Bit entscheidet näm- 
lich darüber, ob die zweiten 128 
Zeichen hardware- oder software- 
mäßig erzeugt werden. Ist es also 
gesetzt, so werden auch die Zei- 
chen mit den Bildschirmcodes 
128 bis 255 softwaremäßig_ er- 
zeugt und können nach Belieben 
neu definiert werden. Allerdings 
steigt dann natürlich der Platzbe- 
darf für den Zeichensatz um das 
Doppelte. Will man einen eige- 
nen Zeichensatz erstellen, aber 
noch Zeichen aus dem normalen 
Zeichensatz übernehmen, so ist es 
am günstigsten, den gesamten 
Zeichensatz aus dem Character- 
ROM ins RAM zu kopieren. Das 
Beispielprogramm Listing 3 er- 
stellt einen Zeichensatz mit den 
deutschen Umlauten und ß (sz). 
Die neuen Zeichen erhalten die 
Bildschirmcodes 65 (A), 79 (©), 


LDA #$12 
STA $02DB 
LDA #$22 
STA $02EA 
LDA #$42 
LDX #307 
STA $22 
STX #23 
LDA #$80 
STA $02B97 
JMP $BAO0F 


DATA169,18 
DATA141,219,2 
DATA169,34 
DATA141 ,234,2 
DATA169,66 
DATA162,07 
DATA133,34 
DATA134,35 
DATA169,128 
DATA141,185,2 
DATA76,9,186 


AKTUELLE ZEILE = 18 


STRINGLAENGE = 34 


STRINGADRESSE : LO-BYTE 
HI-BYTE 


REVERS-FLAG SETZEN 
STRING AUSGEBEN 


* TEXTTABELLE FUER CHAR * 

L3 

DATA77 ,85,76,84,73,67,79,76,79,82,45,68,69,77,79,32,68,69,82,32,71,82 
DATA65,70,73,75,82,79,85,84,73,78,69,78,72,69,32,65,85,83 READY. 





Listing 1, 2. Teil 


Nun ist das ROM aber leider 
(bzw. zum Glück) unveränder- 
bar; folglich muß ein Zeichensatz 
mit selbstdefinierten Zeichen im 
RAM liegen. Dazu muß zunächst 
die Adresse des Zeichensatzes ge- 
ändert werden. Dies ist über die 
Bits 2 bis 7 des TED-Registers 19 
(Adr. $ FF13, dez. 65299), bei de- 


Adresse Bit 76543210 - 

$ D008 RN, # % 00011000 = #$ 18 = dez.24 

$ D009 „rt, = #%00111100 = #$3C = dez. 60 
$ DOOA ‚=, = #%01100110 = #$66 = dez. 102 
$ DOOB ‚Frese — 4%01111110= #$7E = dez. 126 
$ D00C FERRE = # % 01100110 = £$66 = dez. 102 
$ DO0OD .*=,,**. = #%01100110 = #$66 = dez. 102 
$ DOOE Er # % 01100110 = #$66 = dez. 102 
$ DOOF Re = # %00000000 = #$00 = dez.0 


r 





Tabelle 3 


entsprechende 
höchstwertigsten Bits 


0-63 

4 - 127 
128 - 191 
192 - 255 


entsprechende 
Zeichen 


0-63° 


Adresse des zugehörigen Wert der beiden 
TED-Registers Bildschirmcodes 


$ FF15 (dez.65301) 00 
$ FF16 (dez. 65302) 01 
$ FF17 (dez. 65303) 10: 
$ FF18 (dez. 65304) 1 


0-63 
0-63 
0-63 





Tabelle 4 
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C-15 LISTING + CHECKSUMMEN (DC V1.0) 


REM RBSHHHIR HIHI 


REM 
REM DEMO ZUM 


REM EXTENDED COLOR--MODUS 


REM 


REM 1986 BY D.D.+W.R. 


REM 


REM KREIEREN 


REM _ FARBEN FESTLEGEN 
® 


EOLORO,1,3:REM HINTERGRUNDFARBE SCHWARZ 
COLOR1,3,3:REM ZEICHENFARBE ROT 
COLORS3,7,6:REM ZUSATZFARBE BLAU 
POKEsS5I03,5+4*16:REM ZUSATZFARBE GRLUEN 
POKE65304,7+5*#16:REM ZUSATZFARBE GELB 


REM EXTENDED COLOR-MODUS EINSCHALTEN 


POKE&5286 ‚PEEK (65286) OR64 


SENCLR:REM BILDSCHIRM LOESCHEN 


REM ZEICHEN AUF DEN BILDSCHIRM SETZEN 


FORP=3352T03380: READZ: POKEP „Z:NEXTP 
FORP=3432T03687: POKEP ‚P-3432:NEXTP 
DATA4,69,141,207,32,90,149,205,32,69,152,212 


,5,78,132,197,4,96,131 


245 DATA207,12,79,146,237,13,79,132,213,19 


250 3 


255 PRINT"{BLUE SZIULSH SPACEFALSUISTSSICISHIALS 
LITISEINISPACE HHITE RVSON SBYEXSLYILSEIBLSIIGES 
E RVSOFF. SPACE RVSONYTISAYSISTIELRVSOFFE SPACEI G 


REEN SDYR{SUFETSCHKISEIN!" 


260 GETKEYT$:REM AUF TASTENDRUCK WARTEN 


265 2 


270 REM EXTENDED COLOR-MODUS AUSSCHALTEN 


273: 8 


280 FOKE65286 „FEEK (65286) AND1 91 


ENDE DES LISTINGS 





Listing 2 


83 (ß) und 85 (Ü), sind also über 
den.dem neuen Zeichen zugrun- 
deliegenden Buchstaben in Kom- 
bination mit Shift zu erreichen (A 
also z. B. über Shift A). Da das 
Kopieren des Zeichensatzes über 
PEEK- und POKE-Befehle recht 
lange dauert, übernimmt diese 
Aufgabe im Beispielprogramm ei- 
ne kleine Maschinenroutine (Ba- 
siclader in den Zeilen 175 bis 190), 
die Sie auch in eigene Programme 
integrieren sollten. Falls Sie doch 
über PEEK und POKE kopieren 
wollen, so stellt sich noch ein klei- 
nes Problem. Der PEEK-Befehl 


liest nämlich normalerweise im-“ 


mer aus dem RAM. Beim Plus/4 
oder dem erweiterten C 16/116, 
wo sich ja bekannterweise RAM 
und ROM ab Adresse $ 8000 (dez. 
32768) überschneiden, ist das ver- 
ständlich. Aber auch bei der 
Grundversion des C 16/116 kann 
das ROM über PEEK nicht ausge- 
lesen werden, da jatheoretisch ein 
RAM darunterliegen könnte. Die 
Entscheidung darüber, ob das 
' ROM oder das RAM angespro- 
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chen wird, wird in den im vorher- 
gehenden Artikelabschnitt bereits 
erklärten TED-Registern 62 und 
63 getroffen. Glücklicherweise 
haben jedoch die Schlitzohren 
von Commodore an den Anwen- 
der gedacht und die Routine, die 
u.a. ir PEEK-Befehl die Festle- 
gung ROM/RAM trifft, doch tat- 
sächlich ins RAM gelegt. D.h., 
ganz so selbstlos war man bei 
Commodore vielleicht doch 
nicht; es gibt nämlich gar keine 
andere Möglichkeit, da das ROM 
ja durch diese Routine ausgeschal- 
tet wird. Sie liegt im Bereich von 
Adresse $ 0494 (dez. 1172) bis $ 
04A1 (dez. 1185), wo sie von uns 
modifiziert werden kann. Dazu 
genügt der Befehl POKE 1177, 
62, der vor dem Kopieren des 
Character--ROMs von Basic aus 
stehen muß. Danach muß die 
Routine mit POKE 1177, 63 wie- 
der richtiggestellt werden. Den- 
ken Sie bei eigenen Programmen 
auch daran, daß der neue Zei- 
chensatz (ZS), wenn Sie ihn nicht 
gerade über Maschinenprogram- 


C-16 LISTING + CHECKSUMMEN (DOC V1.0) 


100 REM BB HRRBBRBRHRSHRRRHHIHIHIHIEN 
105 REM # 
110 REM * DEUTSCHER ZEICHENSATZ 
115 REM * 
120 REM * 1986 BY D.D.+W.R. 
125 REM * 

REM RBBBEHRIISBIRIIIIRIII HEUER IE 


REM NEUEN ZEICHENSATZ VOR UEBERSCHREIBEN DUR 
CH BASIC SCHUETZEN 


® 
POKESS,0:POKES6,56 


REM CHARACTER-ROM KOPIERROUTINE 
E| 
FORA=900T0930: READD: POKEA,D:NEXTA 2 
SYS900:REM ROUTINE STARTEN 
DATA150,0,132,217,132,219,169,208,133,218,1& 
9,56,133,220,162,7,177,217 
190 DATA145,219,200,208,249,230,218,230,220,202, 
16,242,96 
195 7 
200 REM NEUE ZEICHEN IMPLEMENTIEREN 
ADR=14336+8*45 
FORA=ADRTOADR+7 : READD: POKEA,D:NEXTA 
DATAIOZ:REM „ar... #%. 
DATA24 sSREM .„..##... 
DATA&0O zREM „.####.. 
DATA102:REM „#8... *#. 
DATA1Z4:REM „.uurur, 
DATA1O2:REM „##..*%. 
DATA1O2:REM „a. .#. 
DATAO SREM „zuuoren 
ADR=14336+8*#79 
FORA=ADRTOADR+7: READD: POKEA,D:NEXTA 
DATA1IOZ:REM „##. .*#. 
DATAAO :REM „.rur.. 
DATA1O2:REM „x#..%*%*. 
DATA1O2:REM „”#..*%. 
DATA1O2:REM „.##..#%#. 
DATA1OZ2:REM „#*..#%. 
DATA&O :REM „.#rik.. 
DATAO SREM „ooucune 
ADR=14336+8*85 
FORA=ADRTOADR+7 : READD: POKEA ,D: NEXTA 
DATALOZ:REM „*#..#*. 
DATAO  EREM anne 
DATA1O2:REM „#*..#%. 
DATA1OZ:REM „x... **. 
DATA1IOZ=EREM „*#..*%. 
DATA1O2:REM „xx... **. 
DATA&O :REM „.##r%.. 
DATAO :REM z„.uunnen 
2 
ADR=14336+8*85 
FORA=ADRTOADR+7:READD: POKEA,D:NEXTA 
DATA120:REM .uruns.. 
DATA1O2:REM „#r..*%,. 
DATA1O2:REM „.*#..##. 
DATA12O:REM „xunx%,.. 
DATA1O2:REM „##..#*, 
DATA1IOZ:REM „##..**, 
DATA1IOB=:REM „#*.#*%.. 
DATAI& EREM „#a..... 


REM NEUEN ZEICHENSATZ EINSCHALTEN 


POKE65299,, (PEEK (65299) AND3)ORS&4:REM NEUE ZEI 
CHENSATZ-ADRESSE FESTLEGEN 
445 POKE63298,,PEEK (65298) AND251:REM ZEICHENSATZ 
AKTIVIEREN 
ASoO 8 
455 FRINT"AtSPACE SA SPACE>YD{SPACE SD SPACEIUTSP 
ACE SU SPACEYS{SPACE SS}"=REM NEUE ZEICHEN 

ENDE DES LISTINGS 
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me nutzen, unbedingt mit POKE 
55, LO-Byte der ZS-Adr.: POKE 
56, Hi-Byte der ZS-Adr. vor 
Überschreiben durch Basic ge- 
schützt werden muß. Um einem 
Schockerlebnis vorzubeugen, 
muß noch angemerkt werden, 
daß das Verursachen einer Fehler- 
meldung bei eingeschaltetem eige- 
nen Zeichensatz schwerwiegende 
Folgen nach sich ziehen kann. Ihr 
Computer wird Sie in diesem Fall 
nämlich mit einer wundervoll 
hin- und herwogenden Grafik be- 
glücken, die jedoch die Freude am 
Weiterarbeiten merklich trüben 
kann. Dies ist darauf zurückzu- 
führen, daß mit der Auslösung ei- 
ner Fehlermeldung auch die 
Hires-Grafik auf ale Fall abge- 
schaltet wird (unabhängig davon, 
ob sie überhaupt eingeschaltet 
war oder nicht). Mit dem Ab- 
schalten der Hires-Grafik wird 
aber auch das RAM/ROM Bank- 
Bit in TED-Register 18 gesetzt, 
was dazu führt, daß der TED 
nicht mehr das RAM, sondern ei- 
nen nicht existenten Zeichensatz 
im ROM anspricht (außer der 
Zeichensatz im RAM besitzt die 
gleiche Adresse wie der im 
ROM). Das ist also der Grund, 
warum uns der TED bei einer 
Fehlmeldung mit diesem widerli- 
chen Grafik-Wirrwarr  über- 
rascht. Mit dem Löschen des 
RAM/ROM  Bank-Bits durch 
POKE 65298, PEEK (65298) 
AND 251 läßt sich dem: Zauber 
ein schnelles Ende bereiten. 


Selbsterstellte 
Hires-Modus 
Bekanntlich lassen sich im Hires- 
Modus Zeichen nur über den 
CHAR-Befehl setzen. Anders al- 
lerdings als im Normalmodus 
wird im Hires-Modus für den 
CHAR-Befehl die Zeichensatza- 
dresse nicht über das TED- 
Register festgelegt, da im Hires- 
Modus die entsprechenden 
Zeichen-Bitkonfigurationen di- 
rekt aus dem Zeichensatzspeicher 
in den Grafikbildschirm übertra- 
gen werden. Da es sich hier also 
nicht um einen Zugriff des TED 
handelt, spielt es auch keine Rol- 
le, ob das RAM/ROM Bank-Bit 
gesetzt ist oder nicht (d. h. in Be- 
zug auf das Arbeiten mit der 
Hires-Grafik spielt es natürlich 
wohl eine Rolle). Die Adresse für 
den Zeichensatz für den CHAR- 
Befehl im Hires-Modus läßt sich 
aber glückicherweise trotzdem 
ändern, und zwar ist das Hi-Byte 
der Zeichensatzadresse im RAM- 


Zeichen im 


Speicherzelle $02E4 (dez. 740) ab- 
gelegt (das Lo-Byte der Adresse ist 
ja auch im Normalmodus immer 
0). Uber POKE 740, Hi.Byte der 
ZS-Adr. läßt sich also de ge- 
wünschte Verschiebung der Zei- 
chensatzadresse vornehmen. Der 
durch das vorgestellte Beispiel- 
programm (Listing 3) erzeugte 
veränderte Zeichensatz kann al- 
lerdings nur sehr bedingt im Zu- 
sammenhang mit Hires-Grafiken 
verwendet werden, da dieser aus 
Platzgründen in der Grundver- 
sion des C 16/116 nur in einen 
Bereich gelegt werden konnte, 
der auch von der Hires-Grafik ge- 
nutzt wird. Das hat zur Folge, 
daß Befehle wie z. B. SCNCLR 
den gesamten Zeichensatz zerstö- 
ren. Zu beachten ist auch noch, 
daß nach dem Abschalten der 
Hires-Grafik, will man mit einem 
veränderten Zeichensatz weite- 
rarbeiten, das RAM/ROM Bank- 
Bit wieder gelöscht werden muß, 
da dieses - wie schon erwähnt - 
durch das Abschalten gesetzt 
wird. 


Zeitvorteile durch Abschalten 
des Bildschirmes 


Die Erzeugung des Fernseh- bzw. 
Monitorbildes kostet den C16 re- 
lativ gesehen eine Menge Zeit. 
Dies ist sofort einsichtig, wenn 
man sich überlegt, was für Daten- 
mengen bei jedem Bildaufbau an- 
fallen: allein für den genutzten 
Bildschirmausschnitt muß der 
C16 dem Fernseher insgesamt 
64000 (320*200) Bildpunkte ”mit- 
teilen”, ob sie gesetzt oder unge- 
setzt sind - von den anfallenden 
Farb- und Luminanzinformatio- 
nen einmal abgesehen. Um ein 
flimmerfreies Bild zu erhalten, 
wird der Bildschirm pro Sekunde 
50 mal neu aufgebaut. Diese unge- 
heuer komplexe Tätigkeit schlägt 
selbst bei einem für menschliches 
Ermessen unvorstellbar schnellen 
Mikroprozessor kräftig zu Buche 
und lastet den C16 beispielsweise 
bis zu einem Drittel aus. Ander- 
seits gibt es aber langwierige Tä- 
tigkeiten, bzw. Programmab- 
schnitte, bei denen das Fernseh- 
bild nicht unbedingt nötig ist 
(Datas einlesen, Grafiken aufbau- 
en, Daten sortieren, und und und 
...). Was liegt da näher, als den 
C16 in diesen Fällen von der Ar- 
beit des Bildaufbaus zu befreien, 
also auf das Fernsehbild zu ver- 
zichten? Da die Zeit, die der C16 
am. Bildaufbau spart, zur Pro- 
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grammbearbeitung zur Verfü- 
gung steht, wird die Program- 
mausführung um bis zu 35% be- 
schleunigt. Tatsächlich .sieht der 
TED im C16 die Möglichkeit vor, 
den Bildaufbau zu unterdrücken. 
Zuständig dafür ist das Bit 4 des 
TED-Registers 6 (dez. 65286 / 
hex. $FF06). Ist es gesetzt, ist der 
Bildschirm eingeschaltet und der 
C16 erzeugt ein Fernsehbild. 
Löscht man es, wird der. Bild- 
schirm abgeschaltet (auf Hinter- 
grundfarbe gesetzt) und die Verar- 
beitungsgeschwindigkeit entspre- 
chend gesteigert. Nach dem 
Abschalten kann man den Bild- 
schirm durch erneutes Setzen des 
Bits jederzeit wieder einblenden. 
Von Basic aus wird der Bild- 
schirm durch die Anweisun, 
POKE 65286, PEEK (65286) 
AND 239 

abgeschaltet, und durch die An- 
weisung POKE 65286, PEEK 
(65286) OR 16 - 

wieder eingeschaltet. Es ist unbe- 
dingt zu beachten, daß in dieses 
Register nur maskiert zu schrei- 
ben ist, da die übrigen Bits andere, 
sehr wichtige Steuerungsaufgaben 
übernehmen und nicht ohne wei- 
teres verändert werden dürfen. 


Das Abfrageregister für Tasta- 
tur und Joystick 


Die Abfrage der Tastatur und des 
Joystick organisiert der TED im 
C16 über das Register 8 (dez. 
65288 / hex. $FF08). Dieses Regi- 
ster gibt den Zustand der einzel- 
nen Leitungen des Ein-/ Ausgabe- 
portes des TED-Chips wieder. 


Zum einen ist dieser Port als Aus- 
gang der Tastaturmatrix (8*8) ge- 
schaltet, so daß mit Hilfe des Re- 
gisters 8 die Tastatur ausgelesen 


werden kann, und zum anderen ° 


sind die verschiedenen Joystick- 
Leitungen an diesen Port gekop- 
pelt. Auf die Weise können die 
Joysticks über dasselbe Register 
abgefragt werden. Se 


Während die Abfräge der Tasta- 


tur zum Standard gehört und we- 
der von Basic noch von Maschi- 
nensprache aus eine Schwierigkeit 
darstellen sollte, soll sie hier nicht 
näher behandelt werden. 


Interessanter ist da die Abfrage 
der Joysticks. Hier der entspre- 
chende Auszug aus dem Betriebs- 
system: 


25 87 30 JSR #315? ; Argument des JOY-Befehls holen 
CA DE# ;um eins erniedrigen 


ı EB 82 
Ba FS 


EFA #302 
ECS $EFBE 


;größer als eins ??? 
;ja, dann "ILLEGAL QUANTITY ERROR" 


LDA £EFFB,%; Offset für entsprechenden Port holen 


TA% 

SEI 

STA $FF98 

LIA $FF&Es 
'F STA $FF&8 

CHF $FF6S 

EHE $EFCE 


‚nach X 

; Interrupt sperren 

;Port aktivieren 

; Port auslesen 

; Port erneut aktivieren 
; Daten stabil ??? 

; nein, dann neu auslesen 


CLI ;sonst Interrupt freigeben 


#$FF 


Y 
D #sor 


; Bits invertieren 

;nach Y 

; unteren vier Bits isolieren 
;nach X 


U 
tEFFO,%; entsprechenden Wert laden 


HUF 
SEFEC 
#50 


AS TAr 
ac 81 9A JMF $aAS1 


63 85 


; Feuerknopf zusätzlich gedrückt ??? 
;nein, ===> 

; ja, dann Bit 7 setzen 

‚nach Y = 

; Wert an Funktion übergeben 


‚Er 60 D1 05 08 07 65 565 09 03 02 04. 


«Er FA FD 





Assemblerlisting aus dem Betriebssystem 


Diese Routine können Sie so auch 
in eigenen Programmen zur Ab- 
frage der Joystickports verwen- 
den. Laden Sie dazu das X- 
Register mit der entsprechenden 
Portnummer und springen Sie bei 
$BFC9 (für Port 1 ist der Wert. 0, 
für Port 2 der Wert 1 zu laden). 
Wollen Sie die Ports in einer In- 
terruptschleife abfragen, ist die 
Routine ebenfalls geeignet. Es 


muß dann nur das CLI in $BFDC 
entfallen. Als Ergebnis übergibt 
die Routine im Y-Register einen 
der Joystickpositionen entspre- 
chenden Wert, den Sie im Hand- 
buch auf Seite 185 finden. Bei 
Verwendung der Routine als Un- 
terprogramm in eigenen Pro- 
grammen muß der JMP-Befehl in 
$BFED natürlich durch in RTS 


"ersetzt werden. 
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Die Interruptmöglichkeiten des 
TED 


Zunächst zur Klärung des Begrif- 
fes ”Interrupt”: Der Interrupt ist 
eine hardwaremäßige Unterbre- 
chung des laufenden Program- 
mes, bei der aktuellen die Pro- 
grammzeiger auf den Stack (Sta- 
pelspeicher) gerettet werden und 
in eine spezielle Interruptroutine 
verzweigt wird. 


Diese Möglichkeit wird vom Be- 
triebssystem genutzt, indem es 
durch einen sogenannten Raster- 
zeilen-Interrupt jede 10 Millise- 
kunden (= 0,01 s) das aktuelle 
Programm unterbricht und die 
sogenannte ROM-IRQ-Routine 
mit der Adresse $ CEOE (dez. 
52750) anspringt. 

Diese Routine organisiert u. a. die 
Abfrage der Tastatur, das Stellen 
der internen Uhr und das Halten 
eines Tones. Nach Abschluß der 
Routine werden wieder alle Zei- 
ger vom Stack zurückgeholt, d.h. 
die Konfiguration, die vor dem 
Durchlaufen der Interruptroutine 
im Speicher bestand, wird wieder 
hergestellt, und es wird mit der 
Ausführung des aktuellen Pro- 
grammes fortgefahren.. 


ı Die spezielle, durch den TED ge- 
gebene Interruptmöglichkeit 
nennt sich IRQ (Interrupt Re- 
Quest; daher auch der Name 
. ROM-IRQ-Routine). Die Be- 
handlung des IRQ kann leider 
nur über Maschinensprache erfol- 
gen, so daß sich dieser Artikelab- 
schnitt primär an die Maschinen- 
sprache-Programmierer wendet. 


; Der IRQ läßt sich softwaremäßig 
durch den Assemblerbefehl SEI 
(Set Interruptflag -IRQ verhin- 
dern) unerdrüc en oder auch 
- durch den Befehl CLI (Clear 
Interrupt-flag - IRQ zulassen) 
wieder ermöglichen. Die Starta- 
dresse der IRQ-Routine ist in den 
RAM-Speicherzellen $ 0314 (Lo- 
' Byte, dez. 788) und $0315 (Hi- 
Byte, dez. 789) festgelegt, wo sie 
sich von und für eigene Zwecke 
abändern läßt. : 


Das IMR und das IRR 


Die IRQ-Quellen lassen sich über 
das TED-Register 10 (Adr. $ 
FFOA, dez. 65290) festlegen. Es 
handelt sich um das Interrupt 
Mask Register (IMR), in dem ein 
gesetztes Bit eine IRQ- 
Möglichkeit bestimmt. Im einzel- 
nen hat das IMR folgenden 
Aufbau: 
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Bit 0: Übertragsbit aus 
TED-Reg. 11 


1 = Rasterzeilen-IRQ, 
ausgelöst durch 
TED-Reg. 11 

1 = Impuls vom Light- 
pen - diese Möglichkeit 
existiert beim C 16/116 
noch: nicht 

1 = Unterlauf von Timer 
1 (TED- Reg. 01) 

1 = Unterlauf von Timer 
2 (TED- Reg. 2/3) 
unbenutzt 

1= Unterlauf von Timer 
3 (TED- Reg. 4/5) 

Bit 7: unbenutzt 


Bit 1: 


Bit 2: 


Bit 3: 
Bit 4: 


Bit 5: 
Bit 6: 


Nun gibt es noch ein zweites Re- 
gister, nämlich das Interrupt Re- 


quest Register (IRR) mit der 
Adresse $ FF09 (dez. 65289, TED- 
Reg. 9), in dem mit dem Eintreten 
der im IMR. bezeichneten Freig- 
nisse ein bestimmtes Bit gesetzt 
wird. Die Bits 1 bis 6 stimmen al- 
so mit denen des IMR überein, 
nur das ein gesetztes Bit hier nicht 
einen IRQ-Auslöser festsetzt, son- 
dern kennzeichnet, daß ein be- 
stimmtes Ereignis eingetroffen 
ist. Bit O dieses Registers ist unge- 
nutzt, Bit 7 wird dann gesetzt, 
wenn ein Bit im IMR gesetzt ist 
und durch das Eintreten des be- 
treffenden Ereignisses das korre- 
spondierende Bit im IRR eben- 
falls gesetzt wird. Genau dann ist 
auch der Interruptfall' gegeben, 
d.h. es wird ein IRQ ausgelöst. 


100 REM KRUNUUHREHENEHHHHHNRHR 


105 REM 


* 
110 REM * DEMO ZUM TIMER-IRQ 


115 REM 


* 
120 REM * 1986 BY D.D.+W.R. 


125 REM # 


130 REM HHRIBHRHEBIIBR TEEN 


135 3 
140 : 


145 FORA=818T0893:READD: FP=P+D:POKEA,D:NEXT 


150 


155 PRINT"BEINSCHALTEN MIT SYS 818." 
160 PRINT"AUSSCHALTEN MIT SYS 844.":END 


165 : 
170 : 
175 DATA120 
180 DATA173,10,255 
185 DATA9,16 
190 DATA141,10,255 
195 DATA169,128 
200 DATA141,2,255 
205 DATA141,3,255 
210 DATA169,100 
215 DATA162,3; 
220 DATA208,1& 
225 DATA234 
230 DATA234 
235 DATA234 
240 DATA120 
245 DATA173,10,255 
250 DATA41,2397 
255 DATA141 ,10,255 
260 DATA169,14 

: 265 DATA162,206 
270 DATA141,20,3 
275 DATA142,21,3 
280 DATA8B 
285 DATA96 
290 DATA234 
295 DATA234 
300 DATA234 
305 DATA173,9,255 
310 DATA41,16 
315 DATA208,3 
320 DATA76,14,206 
325 .DATA141 ,9,255 
330 DATA162,39 
335 DATA169,42 
340 DATA157,0,12 
345 DATA202 
350 DATA18,250 
355 DATA76, 195,252 


READY. 


EIN 


SEI 
LDA 
ORA 
sTa 
LDA 
sTa 
sTa 
LDA 
LDxX 
BNE 
NOP 
NOP 
NOP 
SEI 
LDA 
AND 
sTa 
LDA 
LDX 
STA 
STX 
ELI 
RTS 
NOP 
NOP 
NOP 
LDA 
AND 
BNE 
IMP 
sTa 
LDX 
LDA 
sTa 
DEX. 
BPL 
IMP 


SETZEN 


TIMER 2 


SETZEN 


SETZEN 


MIT 
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Die Timer des TED 


Der TED verfügt über drei unab- 
hängige 16-Bit-Timer, die alle in 
der Lage sind, einen IRQ auszulö- 
sen. 

Diese Timer werden mit jedem 
Systemtakt (d. h. also etwa jede 
Mikrosekunde (= 101(-6)s)) um 
eine Einheit heruntergezählt. 
Timer 1 tut sich dabei noch durch 
eine Besonder-heit hervor, denn 
im Gegensatz zu den anderen bei- 
den Timern wird er nach dem 
Unterlauf autömatisch wieder auf 
den gewählten Startwert zurück- 
gesetzt, was ihn befähigt, Zeitin- 
tervalle frei wählbarer Länge zu 
timen. Die anderen beiden Timer 
erhalten nach einem Unterlauf 


IFP<>9A3S2THENPRINT"BFEHLER IN DEN DATA-ZEILEN!"sEND 


INTERRUPT VERHINDERN 
BIT 4 (BIT FUER TIMER 2) IM 
INTERRUPT MASK REGISTER 


STARTWERT FUER 


FESTLEGEN (KANN AUCH WEGFALLEN) 
NEUE IRG-ADRESSE LO-BYTE 
NEUE IR@-ADRESSE HI-BYTE 


INTERRUPT VERHINDERN 

BIT 4 (BIT FUER TIMER 2) IM 
INTERRUPT MASK REGISTER 
WIEDER LOESCHEN 

ALTE IRB-ADRESSE LO-BYTE 
ALTE IRQ-ADRESSE HI-BYTE 
IRQ-ADRESSE 


INTERRUPT WIEDER ERMDEGLICHEN 


INTERRUPT REQUEST REGISTER (IRR) 
HANDELT. ES SICH UM EINEN 

IRQ AUSGELOEST DURCH TIMER 2 ? 
NEIN, ZUR ROM-IR@-ROUTINE 

IRR LOESCHEN ; 


ERSTE BILDSCHIRMNZEILE 
STERNEN (#) FUELLEN 


ZUM ENDE DER ROM-IRQ-ROUTINE 
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immer den Wert #$ FFFF. Der 
Startwert der Timer läßt sich über 
die TED-Register 0 bis 5 (Adres- 
sen $ FF00 bis $ FF05, dez. 65280 


: bis 65285) festlegen, wobei Reg. 0 


das Lo-Byte und Reg. 1 das HI- 
Byte des Timers 1 enthält, Reg. 2 
das Lo-Byte des Timers 2 u.s.w.. 


Wird aus diesen Registern gele- 
sen, so erhält man den aktuellen 
Wert der Timer. Beim Umgang 
mit den Timern ist zu beachten, 
daß diese auch vom Betriebssy- 
stem zum Erzeugen einer Zufalls- 
zahl und für Eingabe/Ausgabe- 
Vorgänge gebraucht werden. 


Während ersteres für uns keine 
Rolle spielt, führt letzteres sogar 
dazu, daß Timer 1 für uns als 
IRQ-Quelle leider ausfällt. Will 
man einen der beiden anderen Ti- 
mer für eigene Zwecke als IRQ- 
Quelle nutzen, muß man in der 
Initialisie-rungsroutine neben der 
Festsetzung der neuen IRQ- 
Adresse das entsprechende Bit im 
IMR setzen. Damit die IRQ- 
Adresse überhaupt geändert wer- 
den kann, muß die Initialisie- 
rungsroutine mit dem Befehl SEI 
beginnen. Das hat eine einfache 
Bewandtnis: Beginnen Sie die 
Routine nicht mit SEI, so kann es 
‘unter Umständen passieren, daß 
sich der Computer bereits nach 
dem Ändern des Lo- Bytes der 
IRQ-Adresse verabschiedet, da 
vielleicht genau nach dieser Ande- 
rung (also dann, wenn das HI- 
Byte noch nicht geändert ist) ein 
IRQ ausgelöst wird, der zum An- 
springen einer falschen Adresse 
führen würde. Das Setzen des zu- 
ständigen Bits im IMR sollte übri- 
gens über einen ORA-Befehl ge- 
schehen, damit der Zustand = 
anderen Bits erhalten bleibt. 


In der neuen IRQ-Routine sollte 


“nun zunächst geprüft werden, ob 


Er 


“der IRQ überhaupt von einem Ti- 
mer und nicht durch eine be- 
stimmte Rasterzeile ausgelöst 
wurde. Dazu wird getestet, ob das 
dem als IRQ-Auslöser festgeleg- 
ten Timer entsprechende Bit im 
IRR gesetzt ist. Ist das nicht der 
Fall, so handelt es sich um einen 
Rasterzeilen-IRQ und es muß in 
die ROM-IRQ-Routine verzweigt 
werde. Handelt es sich um einen 
Timer-IRQ, so muß das IRR 
noch. gelöscht werden, : damit 
nicht sofort nach Beendigung der 
IRQ-Routine wieder ein IRQ aus- 
gelöst wird, was den Computer 
schließlich und bedauernswerter- 
weise zum Abstürzen bringen 


würde. Gelöscht wird das IRR, 


indem der ausihm herausgelesene 
Wert auch wieder in es hineinge- 
schrieben wird. Enden muß die 
eigene Routine mit dem Sprung 
ans Ende der ROM-IRQ-Rou- 
tine, wo die auf den Stack ge- 
brachten Parameter zurückgeholt 
werden und der IRQ mit dem As- 
semblerbefehl RTI (Return from 
Interrupt) abgeschlossen wird. 
Der entsprechende Sprungbefehl 
lautet JMP $ FCC3. Das Gesagte 
soll nun noch durch ein kurzes 
Lernprogramm (Listing 4), das 
während des Timer-IRQs die er- 
ste Zeile mit einem nicht mehr 
löschbaren Zeichen vollschreibt, 
untermalt werden. 


Der Rasterzeilen-IRQ 


Die zweite Möglichkeit einen 
IRQ auszulösen, ist die über eine 
bestimmte Rasterzeile. Der Bild- 
schirm eines Fernsehers oder Mo- 
nitors besteht nämlich aus einer 
sogenannten Lochrasterplatine, 
über die Zeile für Zeile, Punkt für 
Punkt ein von der Elektronik im 
hinteren Ende der Bildröhre er- 
zeugter Elektronenstrahl gesteu- 
ert wird. Je nach den am UHF- 
Antenneneingang des Fernsehers 
anliegenden Informationen, die in 
unserem Falle vom TED stam- 
men, werden dann von diesem 
Elektronenstrahl einzelne Punkte 
auf der fluoreszierenden Schicht 
des Bildschirmes zum Leuchten 
angeregt. Unter Rasterzeilen ver- 
steht man also die einzelnen 
Punktzeilen dieser Lochrasterpla- 
tine. Normalerweise hat ein Fern- 
seher bzw. Monitor 625 Raster- 
zeilen, wovon uns aber nur etwa 
260 zur Verfügung stehen, da der 
TED aus Geschwindigkeitsgrün- 
den nur Halbbilder erzeugt 
(wenn Sie sich das Bild einmal ge- 
nau ansehen, werden Sie merken, 
daß jede zweite Rasterzeile 
schwarz bleibt) und noch einige 
Rasterzeilen am oberen und un- 
teren Bildschirmrand ”ver- 
schluckt” werden. Etwa jeweils 
30 Rasterzeilen werden oben und 
unten vom Bildrahmen bean- 
sprucht, so daß der für den Benut- 
zer verfügbare Raum genau 200 
Rasterzeilen beträgt. Darin liegt 
auch die Erklärung, warum der 
C16/116 im Hires-Modus eine 
Y-Auflösung von 200 Punkten 
hat. Aus. uns verschlossenen 
Gründen (es lassen sich nur Ver- 
mutungen anstellen) haben jetzt 
die Jungens von Commodore den 
Anfang des frei verfügbaren Bild- 
schirmbereiches mit Rasterzeile 3 
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festgelegt und das Ende dement- 
sprechend mit Rasterzeile 202. 
Über die TED-Register 29 und 28 
Bit 0 (Adressen $ FF1D und 
$ FF1C, dez. 65309, 65308) kann 
man erfahren, welche Rasterzeile 
gerade erstellt wird. 


Dabei wird Bit 0 in Register 28 ge- 
setzt, wenn der Rasterzeilenwert 
in-Register 29. den Wert 255 über- 
schreitet. Die restlichen Register 
28 sind unbenutzt. Auch ein be- 
stimmter Rasterpunkt innerhalb 
einer Zeile läßt sich über das 
TED-Register 30 (Adr. $ FFIE, 
dez. 65310) erfahren. Da jedoch 
der gesamte Bildschirm inner- 
halb von nur 20 Millisekunden 
und eine einzelne Rasterzeile da- 
mit in etwa nur 0,08 Millisekun- 
den aufgebaut wird, ist auch von 
Maschinensprache aus eine ge- 
zielte Abfrage auf eine Rasterzeile 
genau nur schwer und auf einen 
einzelnen Rasterpunkt vollkom- 
men unmöglich. 


In den TED-Registern 11, (Adr. $ 
FFOB, dez: 65291) und 10 Bit O 
(Adr. $ FFOA, dez. 65290) läßt 


sich jedoch eine Rasterzeile festle-- 


gen, bei der, wenn auch das ent- 
sprechende Bit im IMR gesetzt ist, 
ein IRQ ausgelöst wird. Bit O des 
Registers 10 ist dabei wieder das 
Übertragsbit aus Register 11. Der 
Rasterzeilen-IRQ wird in mehrfa- 
cher Hinsiht vom Betriebssystem 
genutzt. Durch das eben genannte 
werden nämlich die Rasterzeilen 
161 (#$ At) und 204 (#$ CC) als 
IRQ-Auslöser festgelegt. 


Wie auch schon zu Beginn dieses 
Artikelabschnittes kurz angespro- 
chen, wird das aktuelle Pro- 
gramm nun, da der Bildschirm in 
20 Millisekunden (= 0,02 s) aufge- 
baut wird und es sich um zwei 
Unterbrechungen innerhalb die- 


ser Zeit handelt, etwa jede 1/100- 


Sekunde in seiner Ausführung 
unterbrochen. Nur bei jedem 
zweiten Rasterzeilen-IRQ (näm- 
lich bei Zeile 204), also alle 20 
Millisekunden, wird aber die Ta- 
statur abgefragt, die interne Uhr 
getaktet u.s.w.. - 


Dann nämlich wird in eine Un- 
terroutine verzweigt, deren Star- 


tadresse in den RAM-Speicher- ° 


zellen $ 0312 (Lo-Byte, dez. 786) 
und $ 0313 (Hi-Byte, dez. 787) 
festgelegt ist und die diese Aufga- 
ben übernimmt. Die interne Uhr 
wird dabei innerhalb von fünf 
Unterbrechungen, die in 5 x 0,02 
s = 0,1 s stattfinden, um sechs 
Takte weitergestellt, wobei ein 
Takt hier einer 1/60 Sekunde ent- 


spricht und damit sechs Takte 
wieder 6/60 s = 0,1 s ergeben. 
Der Sound wird ebenfalls in die- 
ser Unterroutine bearbeitet, denn 
durch den IRQ ist es überhaupt 
erst möglich, einen Ton für eine 
längere Zeitdauer zu halten, ohne 
den Programmablauf zu blockie- 
ren. 

So kann nämlich in der IRQ- 
Routine, die ja quasi parallel zum 
aktuellen Programm abläuft, die 
durch den Sound-Befehl festgeleg- 
te Tondauer heruntergezählt und 
der Ton schließlich ausgeschaltet 
werden. 


Die Möglichkeit, einen der bei- 


den IRQ-Vektoren (Adr: $ 0314/ 
$ 0315 bzw. $ 0312/ $ 0313) auf 
die Startadresse einer eigenen 
IRQ-Routine zu verbiegen, kann 
natürlich genutzt werden, ‘um 
auch noch andere Aufgaben in- 
nerhalb des Interrupts parallel 
zum eigentlich laufenden Pro- 
gramm abzuarbeiten. Nach die- 
sem Prinzip arbeitet auch eine 
Interrupt-Uhr, die während des 
IRQs die aktuelle Zeit in die rech- 
te obere Bildschirmecke schreibt. 
Die im Artikelabschnitt über 
Softscrolling vorgestellte Soft- 
scroll-Routine wird ebenfalls auf 
diese Weise realisiert, so daß das 
Scrollen parallel zu anderen 
Handlungen geschehen kann. 

Der Rasterzeilen-IRQ wird aber 
noch auf eine andere Art vom Be- 
triebssystem genutzt, nämlich um 
die Mischung von Text und Gra- 
fik zu ermöglichen. Darin liegt . 
auch die Erklärung, warum bei 
zwei Rasterzeilen ein IRQ ausge- 
löst wird, obwohl nur bei jedem 
zweiten Mal die erwähnten Auf- 
gaben ausgeführt werden, und 
warum es sich gerade um die Ra- 
sterzeilen 161 und 204 handelt. 
Wird der IRQ im Grafikmodus 
mit Textzeilen bei Rasterzeile 161 
ausgelöst, so wird zunächst kurz 
gewartet, bis der TED mit dem 


Bildaufbau bei Zeile 163 ange- 


langt ist, wo dann vom Grafik- in 
den Textmodus umgeschaltet 
wird. Der schon erstellte Grafik- 
teil bleibt davon unbeeinflußt, da 
zunächst das ganze Bild zuende 
aufgebaut wird, bevor auch der 
obere Teil geändert wird. Dazu 
kommt es aber erst gar nicht, da 
am unteren Bildrand außerhalb 
des frei verfügbaren Bereiches 
nach einem erneuten Rasterzei- 
len-IRQ bei Zeile 204 wieder in 
den Grafikmodus zurückgeschal- 
tet wird. Will man den Raster- 
zeilen-IRQ für eigene Zwecke 
nutzen, d.h. neue Rasterzeilen 
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als IRQ-Quellen definieren, ohne 
“die ROM-IRQ-Routine auszu- 
schalten, so stößt man auf erhebli- 
che Probleme. Diese liegen darin 
begründet, daß die ROM-IRQ- 
Routine leider keine Rücksicht 
auf unsere Wünsche nimmt und 
die von uns festgesetzten Raster- 
zeilen wieder durch die eigenen 
Werte überschreibt. 

Die einzige Lösung liegt darin, 
daß man die ROM-IRQ-Routine 
ins RAM kopiert und dort modi- 
fiziert. Die ROM-IRQ-Routine 
liegt im Bereich von $ CEOE bis $ 
CE5F und in ihr wird zunächst 
getestet, ob es sich überhaupt um 
einen Rasterzeilen-IRQ handelt, 
d. h. ob Bit 2 im IRR gesetzt ist. 


Diese Abfrage muß natürlich er- 
halten bleiben, doch dahinter 
kann der Test auf eigene Raster- 
zeilen erfolgen. Listing 5 erzeugt 
auf diese Weise einen Hinter- 
grund und Rahmen, der zur einen 
Hälfte schwarz und zur anderen 
weiß ist. Dazu wird in der Bild- 
schirmmitte bei Rasterzeile 102 
ein IRQ ausgelöst, wo dann die 
Hintergrund- und Rahmenfarbe 
schwarz gesetzt und, da die Ra- 
sterzeilen der ROM-IRQ-Rou- 
tine mitberückichtigt werden 
müssen, der nächste Rasterzeilen- 
IRQ für Zeile 161 festgelegt wird. 


Bei Rasterzeile 161 wird also in 
die kopierte ROM-IRQ-Routine 
verzweigt. Die nächste Rasterzei- 
le, bei der ein IRQ ausgelöst wer- 
den soll, ist, wie auch in der nicht 
modifizierten ROM-IRQ-Rou- 
tine, Zeile 204. Dieser Wert kann 
"also erhalten bleiben. Normaler- 
weise würde jetzt wieder Zeile 
161 folgen, wenn wir diesen Wert 
nicht in der kopierten Routine 
ändern würden; und zwar setzen 
wir dafür Rasterzeile 240 außer- 
halb des sichtbaren Bereiches fest. 
Beim nächsten IRQ gelangen wir 
also wieder in die eigene Routine, 
wo nun für die obere Bildschirm- 
hälfte die Hintergrund- und Rah- 
menfarbe weiß gesetzt wird. Bei 
Zeile 102 werden dann die Farben 
für die untere Hälfte wieder .ge- 
wechselt u.s.w.. > 

Die eigene Routine muß wie auch 
beim Timer-Interrupt mit einem 
Sprung ans Ende der ROM-IRQ- 
Routine (Adr. $ FCC3) enden. 
Auch darf nicht vergessen wer- 
den, vor diesem Sprung das IRR 
zu löschen. In der Initialisierungs- 
routine muß übrigens auch der 
zweite IRQ-Vektor in den RAM- 
Speicherzellen $ 0312/ $ 0313 (Li- 
sting IRQ-Uhr-Vektor genannt) 
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REM EEE 
REM * 

REM #* ZWEIFARBIGER HINTERGRUND % 
REM #* RAHMEN 

REM #* 

REM # 1986 BY D.D. +W.R. 

REM # 

REM HRS EEE II NEIN IE HE IE NINE NE 

E) 

D 

FORA=818T0972: READD: P=P+D3 POKEA,D: NEXT 

IFP<>19201 THENPRINT"WFEHLER IN DEN DATA-ZEILEN!”"sEND 
PRINT"RRIEINSCHALTEN MIT SYS B18.” 

PRINT"AUSSCHALTEN MIT SYS 830."3END 


RR 


DATA120 
DATA169,3 
DATA162,175 : 
DATA160,86 
DATA208,10 
DATA234 
DATA234 
DATA234 
DATA120 
DATA169,20& 
DATA162,66 
DATA160,14 
DATA141,19,3 
DATAL41,21,3 
DATA142,18,3 
DATA140,20,3 
DATABB 
DATAI6 
DATA234 
DATA234 
DATA234 
DATA173,9,255 
DATAa1,2 
DATA240,40 


m 
und 
2 


SEI 
LDA 
LDX 
LDY 
BNE 
NOP 
NOP 
NOP 
SEI. INTERRUPT VERHINDERN 

LDA ALTE IR@- %& IRQ-UHR-ADRESSE HI-BYTE 
LDX " ALTE IRQ-UHR-ADRESSE LO-BYTE 

LDV ALTE IRQ-ADRESSE LO-BYTE 

STA IRB-UHR-ADRESSE UND 

sTA IRG-ADRESSE 

STX k SETZEN 

STY 

cLI INTERRUPT WIEDER ERMDEGLICHEN 

RTS 

NDOP 

NOP ” 

NDP ” 

LDA $FFO9 " INTERRUPT REQUEST REGISTER (IRR) 
AND #802 " HANDELT ES SICH UM . 
BNE $KRI " EINEN RASTERZEILEN-IRQ ? 


INTERRLUPT VERHINDERN 

NEUE IRB- & IRQ-UHR-ADRESSE HI-BYTE 
NEUE IRQ-UHR-ADRESSE LO-BYTE 

NEUE IRQ-AFRESSE LO-BYTE 

NEUE ADRESSEN SETZEN 


5 


# 


EIGENER TEIL DER IRB-ROUTINE .----------------- 


° 

DATA173,11,255 LDA $FFOB JA, IRQ-RASTERZEILE IN AKKU - 
DATA162,161 LDX #$A1 NAECHSTE IRQ-RASTERZEILE 
DATA160,0 LDY #800 "RAHMEN- & HINTERGRUNDFARBE SCHWARZ 
DATA201 ,102 CMP #566 WURDE DER IR@ BEI 

DATA240,8 BEQ $CSET RASTERZEILE 102 AUSGELOEST ? 
DATA162,102 LDX #$66 NEIN, NAECHSTE IR@-RASTERZEILE 
DATA160, 1135 LDY #$71 RAHMEN- & HINTERGRUNDFARBE WEISS 
DATA201 ,240 CHMP #$FO WURDE DER IRQ BEI 

DATA208,18° BNE $RIRQ RASTERZEILE 240 AUSGELDEST ? 
DATA142,11,255 STX $FFOB JA, NAECHSTE IRG-RASTERZEILE UND 
DATA140,21,255 STY $FF15 NEUE HINTERGRUND- & 
DATA140,25,255 STY $FF19 RAHMENFARBE SETZEN 

DATA173,9,255 LDA $FFO9 IRR 

DATA141,9,255 STA $FF09 LOESCHEN 

DATA76,195,252 ANS ENDE DER ROM-IRQ-ROUTINE 


DATA32,96,206 

DATAA44,216,7 $07D8B 

DATA16,14 $FLGi 

DATA173,1,253 $FDO1 

DATA141 „212,7 $07D4 

DATA16,6 $FLG1 

DATA32,149,234 $EAIS 

DATA32,91,234 $EASB 

DATA32,228,227 $E3E4 

DATA173,9,255 $FFOF INTERRUPT REQUEST REGISTER (IRR) 
DATAA1,2 #$02 HANDELT ES SICH UM 

DATA240,40 e SFLG2 "EINEN RASTERZEILEN-IRQ ?_ ___ 
DATA141 ,9,255 $FFO9 JA, IRR LOESCHEN 

DATA44,,11,255 $FFOB . TEST, OB IR@ BEI ZEILE 161 ODER 204 
DATA169,204 #$CC NAECHSTE IRB-RASTERZEILE > 
DATA8O,27 $FLGS --> IR@ BEI RASTERZEILE 161 
DATA108,18,3 ($0312) IR@ BEI ZEILE 204, UHR TAKTEN ETC. 
DATAS2,191,207 SCFBF UHR TAKTEN & REKORDER BEDIENEN 
DATA32,205,206& $CECD TON HALTEN ODER GGF. ABSCHALTEN 
DATA165,251 $FB 


Listing 5, 1. Teil 
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S05 
sıo 
Ss15 
520 
Ss25 
SSO 
533 
- 540 
545 
550 
353 
560 


DATA72 
DATA169,0 
DATA133,251 
DATAB 

DATABS 
DATAS2,17,219 
DATA4O 

DATA104 
DATA133,251 
DATA169,240 
DATA141,11,255 
DATA76,190,252 


READY. 


geändert werden, da die Unter- 
routine, die die Uhr taktet u.s.w., 
ebenfalls im RAM liegen muß. 
Das klingt nun alles etwas kom- 
pliziert (ist es auch), doch wenn 
‘Sie das in den Basic-Loader in- 
tegrierte Assemblerlisting ein- 
mal genau studieren (abzutippen 
brauchen Sie natürlich nur die 
DATA-Werte), werden Sie als 
hochtalentierter Computerfreak 
sicher schnell zur Erleuchtung ge- 
langen. 


Softscrolling 


Das Scrollen ist ein Effekt, den Sie 
- möglicherweise ohne ihn beim 
Namen zu kennen - mit Sicher- 
heit schon auf Ihrem C16 beob- 
achtet haben. Wenn Sie nämlich 
beispielsweise ein Programm Ii- 
sten, das länger als eine Bild- 
schirmseite ist, passiert folgendes, 
sobald das Listing den unteren 
Bildschirmrand erreicht: Der ge- 
samte Bildschirminhalt wird um 
eine Zeichenzeile nach oben ver- 
schoben, die oberste Bildschirm- 
zeile verschwindet und die unter- 
ste, frei werdene Zeile wird die 
nächste Zeile des Listings ge- 
schrieben. Dieses ”Rollen” der 
Zeilen über den Bildschirm nennt 
man in Computer-Neudeutsch 
”Scrollen” (vom englischen 
”Scroll - die Schriftrolle). Beim 
Scrollen unterscheidet man zum 
einen das vertikale Scrollen und 
zum anderen das. horizontale 
Scrollen. Beim Scrollen in verti- 
kaler Richtung bewegt sich der 
Bildschirminhalt von oben nach 
unten bzw. von unten nach oben 
(beispielsweise beim Listen), beim 
Scrollen in,horizontaler Richtung 
von links nach rechts bzw. von 
rechts nach links. Durch Kombi- 
nation beider Bewegungsrichtun- 
gen lassen sich Mischformen er- 
zielen, so daß der Eindruck ent- 
steht, der  Bildschirminhalt 
bewege sich diagonal. Ein weite- 
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TASTATUR ABFRAGEN (SCNKEY) 


NAECHSTE IR@-RASTERZEILE (GEAENDERT) 
SETZEN 


Listing 5, 2. Teil 


res Unterscheidungsmerkmal ist 
die Auflösung des Scrolleffektes; 
während der Bildschirminhalt 
beim Listen gleich um eine ganze 
Zeichenzeile (eine Zeichenzeile 
besteht aus insgesamt acht Punkt- 
oder Bildschirmzeilen) gescrollt 
wird. Wenn der untere Bild- 
schirmrand erreicht ist, wird bei 
professionellen Spielen beispiels- 
weise meist das sogenannte Softsc- 
rolling verwendet, bei dem der 
Bildschirminhalt punktweise ver- 
schoben werden kann. Durch die- 
se achtfach höhere Scrolling- 
Auflösung gegenüber dem LIST- 
Effekt wirken die entstehenden 
Bewegungen viel gleichmäßiger, 
fließender und weicher - eben 
soft, womit auch schon der Ur- 
sprung des Namens ”Softscrol- 
ling” eindeutig geklärt wäre. 
Kaum ein Profispiele-Program- 
mierer läßt diesen äußerst beein- 
druckenden Grafikeffekt unge- 
nutzt, den der C16 in gleichem 
Maße wie sein ”großer Bruder” 
C64 beherrscht. Ein Meister auf 
diesem Gebiet - was den C16 be- 
trifft - ist sicherlich Udo Gertz 
von Kingsoft, der u. a. Spiele wie 
TOM a Winterolympiade pro- 
grammiert hat, die beide kräftig 
vom Softscrolling-Effekt Ge- 
brauch machen. Aber auch dem 
engagierten Hobbyprogrammierer 
stehen die Softscrolling-Möglich- 
keiten des C16 für eigene Anwen- 
dungen ohne weiteres offen: Man 
muß halt nur wissen, wie’s funk- 
tioniert. Ihnen dies zu vermitteln, 
ist Aufgabe dieses Kapitels. Ein 
Wort vorweg: sinnvolle Soft- 
scrolling-Programmierung ist-aus 
Geschwindigkeitsgründen nur von 
Maschinensprache aus möglich. 
Basic-Programmierer seien hier 
entweder ausschließlich auf das 
Demoprogramm am Ende des 
Kapitels oder aber auf weiter- 
führende Literatur zum Thema 
Assemblerprogrammierung ver- 
wiesen. 
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Für die Steuerung des Scrolling-» 
Effektes sind im TED-Chip des 
C16 zwei Register zuständig: für 
das Scrollen in vertikaler Rich- 
tung ist Register 6 (dez. 65286 / 
hex. $FF06), für das Scrollen in 
horizontaler Richtung das Regi- 
ster 7 (dez. 65287/ hex. $FF07) 
verantwortlich. Streng genom- 
men sind es jeweils nur die vier 
unteren Bits beider Register; die 


übrigen Bits haben andere, sehr ° 


wichtige Steuerungsaufgaben. 
Entsprechend darf in beide Regi- 
ster nur maskiert geschrieben 
werden, um den TED nicht bei 
seiner Arbeit zu behindern. Die 
unteren drei Bits des Registers 6 
sind für die Scrollposition des 
Bildschirmes in Y-Richtung zu- 
ständig. Der Normalwert dieser 
drei Bits beträgt 3, d. h., es sind 
die Bits O und 1 gesetzt, während 
Bit 2 ungesetzt ist. 

Zusammen mit den übrigen Bits 
des Registers ergibt sich ein Regi- 
sterinhalt von 27 (hex. #$1D). 
Sie können dies ganz einfach per 
PEEK-Befehl überprüfen. Wenn 
Sie nun mit POKE 65286,28 die 
Scrollposition des. Bildschirmes 
um eins erhöhen, sehen Sie, was 
passiert: der gesamte Bildschirm- 
inhalt wird um eine Punktzeile 
nach unten verschoben. Gleich- 
zeitig sollte Ihnen aber auffallen, 


daß in der obersten Punktzeile 


ausgesprochener Murks erscheint. 
Dies ist natürlich weder beabsich- 
tigt noch sehr sinnvoll. 

Doch auch hier hat der TED 
gleich intern eine-Lösung parat: 
das Bit 3 des Registers 6 dient 
nämlich dazu, den Bildschirm 
zwischen einem- 25- und einem 
24-Zeifenmodus umzuschalten. 
Normalerweise (nach dem Ein- 
schalten) befindet sich der C16 im 
25-Zeilenmodus, auf dem Bild- 
schirm werden 25 Zeichenzeilen 
dargestellt, Bit 3 des Registers 6 ist 
gesetzt. Löscht man dieses Bit, so 
wird der Bildschirm oben und 


unten jeweils um vier Punktzei- 
len verkleinert. Zweimal vier 
Punktzeilen ergeben zusammen 
acht Punktzeilen, also eine Zei- 
chenzeile. Insgesamt ist der Bild- 
schirm somit um eine Zeichen- 
zeile kleiner geworden, es werden 
nur noch 24 Zeilen dargestellt. 
Der Nachteil dieses Vorgehens, es 
paßt ganz einfach weniger auf den 
Bildschirm, wird durch den Vor- 
teil, bei Verwendung des Scrol- 
ling-Effekts ist oben erwähnter 
Murks nicht mehr sichtbar, voll 
aufgewogen. 


So, nun haben wir eigentlich alle 
Angaben, die für das Scrollen nö- 
tig sind, zusammen; greifen wir 
uns das Beispiel Scrollen nach un- 
ten heraus, um die Programmie- 
rung in der Praxis zu verdeutli- 
chen. Nach unseren Erfahrungen 
empfiehlt sich folgende Vorge- 
hensweise: 


1 - Füllen Sie den Bildschirm mit 
dem gewünschten Inhalt, der 
gescrollt werden soll. 


2- Verkleinern Sie den Bild- 
schirm auf 24 Zeichenzeilen, 
indem Sie Bit 3 des Registers 6 
löschen. Nicht vergessen: in 
dieses Register ist unbedingt 
maskiert zu schreiben, da die 
übrigen Bits teilweise sehr 
wichtige Steuerungsaufgaben 
besitzen und nicht ohne wei- 
teres beeinflußt werden dür- 
fen. Ansonsten kann es sehr 
leicht passieren, daß Sie den 
TED und damit den Compu- 
ter lahmlegen. 


3- Setzen Sie die unteren drei 
Bits des Registers 6 (Scrollpo- 
sition des Bildschirmes in Y- 
Richtung) alle auf 0. 


Erhöhen Sie den Inhalt dieser 


> 
{ 


drei Bits schrittweise von O auf ° 


7. Dies.hat am besten in einer 


Schleife zu erfolgen, die sie 


benmal durchlaufen wird. 
Unter Umständen kann eine 
kleine Verzögerungsschleife 
nötig werden - entsprechend 
der gewünschten Scrollge- 
schwindigkeit. 


u 
' 


An diesem Punkt müßte ei- 
gentlich zu Punkt 3 zurückge- 
kehrt werden, um dort fortzu: 
setzen. Würde dies jedoch so 
ohne weiteres erfolgen, würde 
der Bildschirminhalt ruckar- 
tig in die Normalposition zu- 
rückversetzt werden, um 
dann wiederum um sieben 


Y 
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Scrollpositionen nach unten 
verschoben zu werden. Dieses 
Zittern” des Bildschirmes ist 
natürlich nicht der Effekt, den 
wir erzielen wollten; deshalb 
muß hier noch einmal die 
Programmierkunst einsetzen: 
bevor zu Punkt 3 zurückver- 
zweigt wird, wird der gesamte 
Bildschirminhalt um eine Zei- 
chenzeile (nicht um eine 
Punktzeile !) nach unten ver- 
schoben. Dazu wird Zeile 23 
in Zeile 24 kopiert, Zeile 22 in 
Zeile 23 und so weiter. Dabei 
kann - je nach gewünschtem 
Effekt - in die oberste, frei 
werdende Zeile (Zeile 0) ent- 
weder die vormals letzte Zeile 
(Zeile 24) kopiert werden (so 
rollt derselbe Bildschirmin- 
halt kontinuierlich), oder aber 
eine neue Zeile, die sich ent- 
sprechend anschließt; dies er- 
gibt den Effekt, als sei der 
Bildschirminhalt ein Aus- 
schnitt eines viel größeren 
Bildschirmes. 

6 - Kehren Sie an dieser Stelle zu 
Punkt 3 zurück und setzen Sie 
dort wieder ein. 


Das Ergebnis eines Programmes, 
das diese Schritte analog auf den 
Computer umsetzen würde, wäre 
eine fließende, weiche Scrollbe- 
wegung des - Bildschirminhalts 
nach unten. Die Vorgehensweise 

für das Scrollen nach oben ist im 

Prinzip gleich, da dasselbe Regi- 

ster bedient werden muß: 

1 - Bildschirm füllen. 

2.- Bildschirm auf 24 Zeichenzei- 
len verkleinern. 

3- Setzen Sie die unteren drei 
Bits des Registers 6 alle auf 1. 
Dies ergibt einen Wert von 
sieben. 

4 - Erniedrigen Sie den Inhalt die- 
ser drei Bits schrittweise von 7 
auf 0. 

5. Verschieben Sie den Bildschir- 
minhalt um eine Zeichenzeile 
nach oben (umkopieren). 
Denken Sie daran, daß hier 
die unterste, frei werdene Zei- 
le einen neuen Inhalt erhalten 
muß (vgl. scrollen nach- 
unten). 

6 - Setzen Sie bei Punkt 3 fort. 


Ein entsprechendes Programm er- 
gibt eine fließende Bewegung des 
Bildschirminhalts nach oben. 
Dies waren in allen Einzelheiten 
die beiden möglichen Bewegungs- 
richtungen in vertikaler Rich- 
tung; wie schon oben erwähnt, ist 
das Ganze auch in horizontaler 
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REM * 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM #* 


KK * 


REM 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


DATA 4 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


KARURNRÄRRHHRENRHNHRENERERUNNR UNE 


SOFTSEROLLING- 


DEMO 


FUER DEN C16/116 & PLUS/4 


(w '’86 BY D.D. % W.R. 


ESE Ze Ze SE SE Ze 22 Ze Ze Ze 3 


KERRRUEHERKUUR UHREN HN NN NUN ER 


kurs 


*** DATAS FUER MASCHINENROUTINE ### 


A2,27 
RD,90,3F 
9D,00,0C 
ca 

10,F7 

E8 
8E,E7,07 
ES 
BE,E6,07 
86,D8 
A2,22 
AO,3F 

78 
8E,14,03 
8C,15,03 
58 

60 
AD,09,FF 
8D,09, FF 
29,02 
D0,03 
AC,18,CE 
AE,ID,FF 
E0,50 
BO,OE 
AD,07,FF 
29,F0 
09,08 
80,07, FF 
A2,FA 
DO,3SF 
C6,D8 
10,19 
AD,00,0C 
Fa: 


REM 
REM FLGO1 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM FLGO3 
REM 
REM 
REM 
REM 
REM FLGO& 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 


LDX #327 
LDA $3F90,X 
STA $0C00,X 
DEX 

BPL $FL601 
INX 

STX $07E7 
INX 

STX '$07E6 
STX $DB 
LDX #$22 
LDY #$3F 
SEI 

STX $0314 
STV $0315 
ELI 

RTS 

LDA $FFO9 
STA $FFO9 
AND #302 
BNE $FLGO2 
JMP $CE18 
LDX $FF1D 
CPX #850 
BCS $FLGO3 
LDA $FFO7 
AND #$FO 
ORA #508 
STA $FFO7 
LDX #$FA 
BNE $FLG04 
DEC $D8 
BPL $FLGOS 
LDA $0L00 
PHA 

LDX #300 
LDA $0C01,X 
STA $0L00,X 
INX 

CPX #527 
BCC $FLGO& 
PLA 

STA $0627 
LDA #807 
STA $DB 
LDA $FF07 
AND #$FO 
ORA $DB 
STA $FFO7 
JSR $CFBF 
JSR $CECD 
LDA $FB 
FHA 

LDA #300 
STA $FB 
PHP 

ELI 

JSR $DB11 
PLP 

PLA 

STA $FB 
LDX #$0A 
STX $FFOB 
J3MP $FCBE 


A2,00 
BD,01,0C 
9D,00,0C 
EB 
E0,27 
90,F5 
68 
8D,27,0C 
A9,07 
85,D8 
AD,07,FF 
29,F0 
05,D8 
80,07,FF 
20,BF,CF 
20,CD,CE 
A5,FB 
48 

A9,00 
85,FB 
08 

58° 
20,11,DB 
28 

68: 

85, FB 
A2,0R 
BE,OR,FF 
AC,BE,FC 


“00 00 00 00 00 08 00 08 00 0P 28 te 0 10 US MB IE MO 00 a0 MB, EB 0 OB mE 00 UE mE 10 a0 a5 En 0m ab LE 20 an d0 RR 00 U En RB ER mE 00 06 00 EE 00 00 = a 


wu EEE EEE EEE EEE EEE NEE EEE EEE EEE EEE EEE ME EEE a a ae 
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Sompuhe mit 


TEXTLAENGE DER KOPFZEILE 
KOPFZEILE IN DAS VIDEORAM 
KOPIEREN 


X=0 -> LINKE, OBERE WINDOW-ECKE 
AUF (0,1) SETZEN 
x=1 


MOMENTANE SCROLLPOSITION AUF O 
NEUER INTERRUPT-VEKTOR LOW 
HIGH 
INTERRUPT SPERREN 
NEUEN INTER. -VEKTOR SETZEN LOW 
R HIGH 

INTERRUPT FREIGEBEN 
ZURUECK INS BASIC 
INTERRUPT-FLAG-REGISTER LESEN 

UND LOESCHEN 
RASTER-INTERRUPT 777? 
==> JA 
==> NORMALER SYSTEM-INTERRUPT 
RASTERZEILE LESEN 
INTERRUPT IN ZEILE $FA 77? 
==) JA 
STANDARD-BILDSCHIRM EINSCHALTEN 
(40-SPALTEN MDDUS UND NORMALE) 
(SCROLLPOSITION 2) 


NAECHSTER INTERRUPT IN ZEILE $FA 
==> IMMER 

SCROLLPOSITION ERNIEDRIGEN 

==> NOCH GROESSER NULL 

KOPFZEILE UM EIN ZEICHEN NACH 
LINKS VERSCHIEBEN 


SCROLLPOSITION AUF SIEBEN 


BILDSCHIRM AUF 38 SPALTEN 
VERKLEINERN. UND SCROLLPOSITION 
INS REGISTER UEBERTRAGEN 


==> DATASSETTE, UHR BEDIENEN 
==> SOUND 

MODULKONFIGURATION 

MERKEN 

ROM 

EINSCHALTEN 


INTERRUPT SPERREN 
TASTATUR ABFRAGEN 


MODULKONF IGURATION 
WIEDERHERSTELLEN 
NAECHSTER INTERRUPT IN ZEILE $0A 


==> RTI 





19 


20 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


EA 
EA 
ER 
EA 
EA 
EA 
EA 


: REM 


: REM 


: REM 


: REM 


AO,AO,AO,AO,AO,AA,AO,89 : 
BE,94,85,92,92,95,90,94 
AD,AO0,A&,A0,93,8F,86,94 
93,83,92,8F ,3C,8C,89,8E 
87,AD,84,85,8D,8F ,A0,AA 


NOF 
NDP 
NOP 
NOP 
NOP 
NOP 
NOP 


REM 


REM 
REM 


REM 


REM 


REM 


: REM 
: REM 


POKES2,61:POKES&A,s1:CLR 


REM TEXT " 
"NTERRUPT" 
SZ SOFT" 
"SCROLLIN" 
"G-DEMO #" 


* I" 


**# EINLESEN DER MASCHINEN-ROUTINE #*## 


RESTORE: FORI=16128T016311:READA$: A=DEC (A$) «P=P+A:FOKEI „ArNEXTI 


IFF< >23828THENPRINT"IRBISFEHLER IN DEN DATA-ZEILEN!"sEND 


PRINT"LERNBITTE SEHR .„.. 


Richtung möglich. Dafür ist Regi- 
ster 7 (dez. 65287 / hex. $FF07) 
des TED zuständig: Analog zu 
Register 6 geben die drei unteren 
Bits die Scrollposition des Bild- 
schirminhalts und Bit 3 die Bild- 
schirmgröße an. Ist Bit 3 gesetzt, 
werden 40 Bildschirmspalten dar- 
gestellt (”"Normalfall” - nach dem 
Einschalten), setzt man das Bit auf 
0, so werden nur noch 38 Spalten 
dargestellt. Wie oben ist dieses 
Verkieinern - des Bildschirmes 
beim Scrollen unverzichtbar. Die 
Darstellung der Scrollposition 
entspricht genau der Darstellung 
in Register 6: Ein Erhöhen der 
Scrollposition verschiebt den 
Bildschirminhalt punktweise nach 
rechts, ein Erniedrigen der Scroll- 
position entsprechend nach links. 
Folglich empfiehlt sich beim 
Scrollen in horizontaler Richtung 
folgende Vorgehensweise (die 
Werte im Text beziehen sich auf 
das Scrollen nach rechts, die in 
Klammern auf das Scrollen nach 
links): 
1 - Füllen Sie den Bildschirm mit 
dem gewünschten, zu scrol- 
lenden Inhalt. 


2 - Verkleinern Sie den Bildschirm 
durch Löschen des Bits 3 des 
Registers 7 auf 38 Spalten. 


3 - Setzen Sie die unteren drei Bits 
des Registers 7 alle auf 0 (1). 
Dies ergibt einen Wert von 0 (7). 

4 - Erhöhen (Erniedrigen) Sie den 
Inhalt dieser drei Bits von 0 (7) 
auf 7 (0). 

5 - Verschieben Sie den Bildschir- 
minhalt um eine Zeichenspal- 
te nach rechts (links). Verges- 
sen Sie nicht, die frei werden- 
de Spalte neu aufzufüllen. 


6 - Fahren Sie mit Punkt 3 fort. 


":5Y516128 


Listing 6, Teil 2 


Auf diese Weise läßt sich auch ein 
weiches Scrollen in horizontaler 
Richtung leicht programmieren. 
Mischt man beide Bewegungs- 
richtungen miteinander (bei- 
spielsweise abwechselnd um ei- 
nen Punkt nach rechts und dann 
um einen Punkt nach unten), so 
lassen sich auch weiche Bewegun- 
gen in dialgonaler Richtung auf 
die gleiche Art bewerkstelligen. 
So lassen sich zum Beispiel recht 
realistische Bewegungen über eine 
Landschaft programmieren. Je- 
der, der schon einmal versucht 
hat, Tom im gleichnamigen 
Kingsoft-Spiel durch die diversen 
Bilder zu manövrieren, kennt die- 
sen Effekt. In unserem Demopro- 
gramm haben wir uns das Beispiel 
der horizontalen Scrollbewegung 
herausgegriffen, um die entspre- 


chenden Programmiertechniken' 


auch einmal in der Praxis zu ver- 
anschaulichen. Geben Sie bitte Li- 
stung 6 ein (REM-Anweisungen 
können Sie dabei ersatzlos weglas- 
sen), und starten Sie das Pro- 
gramm mit RUN. Falls Sie bei 
der Eingabe der Datazeilen kei- 
nen Fehler gemacht haben, er- 
scheint in der obersten Bild- 
schirmzeile der Text ”INTER- 
RUPT - UND SOFTSCROL- 
LING-DEMO”, und dieser Text 
wird nun punktweise nach links 
über den Bildschirm gescrollt. 
Dieser Laufschrifteffekt ist auch 
bei Profiprogrammierern äußerst 
beliebt und findet sich in sehr vie- 
len Spielprogrammen wieder. 


Nun zur Programmiertechnik: 
damit beim Scrollen nicht der 
ganze Bildschirm mitbewegt 
wird, war der Einsatz eines Ra- 
sterzeileninterrupts unumgäng- 
lich. Dadurch wird der Bild. 


GSompute mik 





schirm quasi in zwei Teile aufge- 
spalten: auf der einen Seite Zeile 
0, auf der anderen die übrigen 24 
Zeilen. Diese beiden Teile des 
Bildschirmes können völlig unab- 
hängig ‘voneinander gesteuert 
werden. Doch ist dies an dieser 
Stelle eigentlich nur ein neben- 
sächlicher Eingriff; wer sich be- 
sonders für die Interruptprogram- 
mierung interessiert, möge das 
Assemblerlisting genau studieren 
- die Erläuterungen sollten ausrei- 
chen, um es verstehen und nach- 
vollziehen zu können. Zur Erklä- 
rung des Softscrolling sind eigent- 
lich nur die Zeilen 1480 bis 1650 
von Bedeutung. In Zeile 1480 


wird die momentane Scrollposi- _ 


tion, die im Hilfsregister $D8 
zwischengespeichert ist, um 1 er- 
niedrigt. Befindet sich der Wert 
der Scrollposition noch im er- 
laubten Bereich (0 bis 7), wird di- 
rekt nach Zeile 1620 verzweigt, 
wo der Bildschirm verkleinert 
(auf 38 Spalten) und die Scrollpo- 
sition (maskiert!) in das Register 7 
übertragen wird. Dadurch bewegt 
sich die Kopfzeile jeweils um ei- 
nen Punkt nach links. Wird der 
erlaubte Bereich unterschritten, 
also der Grenzwert O erreicht, 
muß die gesamte Zeile um ein 
Zeichen nach links verschoben 
werden (1500 bis 1590). 


Dazu wird das Zeichen ganz links 
auf den Stack geschoben (1500 bis 
1510), die Zeile umkopiert (1520 
bis 1570) und anschließend das 
Zeichen vom Stack in die Posi- 
tion ganz rechts geschrieben 
(1580 bis -1590). Die Scrollposi- 
tion wird anschließend auf 7 
hochgesetzt und in das Register 7 
übertragen. Auf diese Weise wird 
der Inhalt der obersten Bild- 


schirmzeile immer wieder um ei- 
ne Punktbreite nach links ver- 
schoben, ohne daß sich der Zeile- 
ninhalt ändert. Es entsteht der Ef- 
fekt einer Laufschrift. Die 
Bewegung wirkt dabei fließend . 
und weich, was dem ganzen einen 
professionellen Anstrich verleiht. 
Durch die Definition eines ent- 
sprechenden Windows ist die 
scrollende Bildschirmzeile vor 
dem Überschreiben geschützt. 


Umschalten zwischen PAL- und 
NTSC-Norm 


PAL (Phase Alternation Line) 
und NTSC (National Television 
System Committee) bezeichnen 
zwei verschiedene Systeme zur 
Erzeugung eines Fernsehbildes. 
”Zwei verschiedene Systeme” ist 
dabei sogar schon stark übertrie- 
ben, denn erzeugt wird das Fern- 
sehbild nach dem gleichen Prin- 
zip, nur sind bei beiden Systemen 
die Parametereinstellungen (Fre- 
quenz, Anzahl der Rasterzeilen) 
etwas unterschiedlich. Unser - 
wie wohl auch Ihr -C16 ist auf die 
in Deutschland gebräuchliche 
PAL-Norm voreingestellt, so daß 
man ihn ohne weiteres an ein 
handelsübliches Fernsehgerät an- 
schließen kann. In Amerika und 
Japan ist dies anders: Dort wird 
mit der NTSC-Norm gearbeitet, 
und entsprechend sind die Com- 
puter dort wohl auch eingestellt. 
Unser C16 bzw. der TED-Chip 
im C16, der unter anderem für die 
Erzeugung des Fernsehbildes zu- 
ständig ist, kann alle beide Syste-' 
me bedienen. Als Schaltbit dient 
Bit 6 des Registers 7 (dez. 65287 / 
hex. $FF07). Ist es gesetzt, wird 
ein NTSC-Bild erzeugt, ist es un- 

esetzt ein PAL-Bild. Durch Aus- 
er des Registerinhaltes können 
Sie sich davon überzeugen, daß 
das Bit bei Ihrem C16 - entspre- 
chend der in Deutschland übli- 
chen PAL-Norm - nicht gesetzt 
ist. Wenn Sie das Bit probehalber 
einmal auf 1 setzen (mit POKE 
65287, PEEK (65287) OR 64), se- 
hen Sie, daß das Bild völlig ver- 
murkst wird. Der Fernseher ver- 
steht die Signale aus dem Compu- 
ter einfach nicht mehr. 


Uns ist zu diesem Bit keine halb- 
wegs sinnvolle Anwendung ein- 
gefallen, was die Wichtigkeit, es 
zu kennen, keineswegs schmälert. 
Vielleicht kann ja einer der Leser 
mit einer Anwendung aufwarten - 
obwohl sich das wahrscheinlich 
schwierig gestaltet. 
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REM 
REM * 
REM * 
REM * 
REM * 
REM * 
REM * 
REM * 
REM #* 
REM * 
REM * 
REM # 
REM *+ 
z 


® 

s REM 
s 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
s 


AZ,OD 
A0,04 

78 
8E,14,03 
8C,15,03 
58 


REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 


AD,OC,FF 
29,03 

AE,OD,FF 
8D,26,0C 
BE,27,0C 


2 
E) 
s 
E) 
ED) 
: 
&0 . 
8 
8 
2 
B 
s 
4C,0E,CE et 


D 
: REM 
: 


* 
* 

* 

* 

* 

FUER DEN C15/11& & PLUS/4 * 
: * 

* 

* 

* 


(wW) '86 BY D.D. 


EREREERENEERERUEHN TRIER UUNENH 


RI IHEN HEIEEIE 
HARDWARELCURSOR 


DEMO 


& WR. 
* 
* 


##* DATAS FUER MASCHINENROUTINE ### 


LDX 
LDY 
SEI 
STX 
STY 
cLI 
RTS 
LDA 
AND 
LDX 
STA 
STX 
JMP 


#$0D 
#504 


$05314 
$0315 


$FFOC 
#503 

$FFOD 
$0C26 
$0C27 
$CEOE 


*##* EINLESEN DER MASCHINEN-ROUTINE ### 


NEUE INTERRUPTADRESSE LOW -BYTE 


HIGH-BYTE 


INTERRUPT SPERREN ? 
NEUE I1.-ADRESSE SPEICHERN LOW 


HIGH 


INTERRUPT FREIGEBEN 

ZURUECK INS BASIC 

HIGH-BYTE DES HARDWARECURSORS 
UNTEREN BEIDEN BITS ISOLIEREN 
AUF BILDSCHIRM SCHREIBEN 
LOW-BYTE DER HARDWARECURSDRS 
AUF BILDSCHIRM SCHREIBEN 

==> NORMALE INTERRUPT-ROUTINE 


RESTORE: FORI=1024T010533 READA$: A=DEC (A$) ı P=P+As POKEI „As NEXTI 
IFP< >2578THENPRINT"LHNNFEHLER IN DEN DATA-ZEILEN!"sEND 
PRINT"LARIIBITTE SEHR .„.."3SYS51024 READY. 


Der Hardware - Cursor 


Anders als beispielsweise beim 
C64 wird beim-C16 das Blinken 
des Eingabecursors nicht soft-, 
sondern vielmehr hardwaremäßi 

erzeugt. Aus diesem Grunde muß 
sich der TED: die momentane 
Cursorposition laufend mitproto- 
kollieren. Dies geschieht in den 
beiden TED-Registern 12 (dez. 
65292 / hex. $FFOC) und 13 (dez. 
65293 / hex. $FFOD). Dabei wird 
die Cursorposition nicht im ge- 
wohnten X/Y-Koordinatenfor- 
mat (Spalte/Zeile) dargestellt, 
sondern es wird die Adresse des 
Cursors relativ zur Basisadresse 
des Videoram angegeben. Das Vi- 
deoram ist ja bekanntlich so orga- 
nisiert, daß man von links oben 
bis rechts unten die Bildschirm- 
positionen zeilenweise durch- 
zählt. Da der Bildschirm 40*25, 
also 1000 Zeichen faßt, braucht 
man 10000 Speicherzellen, um al- 
le Bildschirmpositionen darstel- 
len zu können. Um 1000 Positio- 
nen adressieren zu können, sind 
in der Binärdarstellung zehn Bits 
notwendig. Diese hat der TED in 
den besagten Registern reserviert: 
Regiter 13 enthält die acht unter- 
en Bits und die Bits O und 1 des 
Registers 12 stellen die beiden 
höchstwertigsten Bits der Adresse 
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Listing 7 


dar. Die übrigen Bits des Registers 
12 haben keine weitere Bedeu- 
tung und sind grundsätzlich im- 
mer auf 1 gesetzt. Unabhängig 
von der Lage des Videorams (nor- 
mal: dez. 3072 / hex. $0C00) wird 
in diesen Registern die Cursorpo- 
sition innerhalb des Videorams 
dargestellt, wobei quasi eine Basi- 
sadresse von 0 zugrunde gelegt 
wird. Diese beiden Register sind 
natürlich nur in Betrieb, wenn 
der Cursor wirklich blinkt, man 
sich also im Direktmodus befin- 
det. Sonst sind alle Bits in den Re- 
gistern auf 1 gesetzt. Entspre- 
chend schwierig gestaltet sich na- 
türlich das Auslesen der Register; 
denn sobald man beispielsweise 
versucht, per PEEK-Befehl auszu- 
lesen, erhält man den nichtssagen- 
den Wert 255 (alle Bits gesetzt) als 
Registerinhalt, da bei Eingabe des 
Befehls der Computer den Di- 
rektmodus verläßt, um den Be- 
fehl auszuführen. Hier bietet sich 
die Abfrage per Interrupt an. Ge- 


* ben Sie dazu bitte Listing 7 ein 


und starten es mit RUN. Es wird 
ein kurzes Maschinenprogramm 
eingelesen und gestartet. Darauf 
werden in der rechten oberen 
Bildschirmecke zwei Zeichen dar- 
gestellt. Diese kommen dadurch 
zustande, daß per Interrupt lau- 
fend die Inhalte der Register 12 





und 13 ausgelesen und in die be- 
en Bildschirmpositionen ge- 
schrieben werden. Anhand dieser 
Zeichen kann man nun überprü- 
fen, wie Cursorposition und Re- 
gisterinhalte genau zusammen- 
hängen. Fahren Sie mit dem Cur- 
sor einmal willkürlich über. den 
Bildschirm; Sie werden sehen, 
wie sich die Zeichen verändern. 
Über die Bildschirmcodes der an- 
gezeigten Zeichen kann man die 
Cursorposition leicht errechnen. 


Die Soundmöglichkeiten des 
TED 


Der TED-Chip im C16/116 und 
Plus/4 besitzt zwei Tongenerato- 
ren, von denen einer nur Töne, 
der andere sowohl Töne als auch 
Geräusche erzeugen kann. Beide 
Tongeneratoren werden in ihren 
Soundfähigkeiten durch das Basic 
3.5 ausreichend unterstützt 
(SOUND, VOL). Will man die 
Tongeneratoren jedoch von Ma- 
schinensprache aus bedienen oder 
bestimmte Soundeffekte erzeu- 
gen, so ist es unerläßlich, die ent- 
sprechenden TED-Register und 
ihre Bedeutung genau zu kennen. 
Insgesamt fünf Register sind an 
der Sounderzeugung des TED be- 
teiligt. Es sind dies die Register 14 
bis 18 (dez. 65294 bis 65298, hex. 
$FFOE bis $FF12). Anders als bei- 
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spielsweise beim SID des C64 ist 
die Tonerzeugung beim TED ex- 
trem einfach gehalten. Für einen 
Ton sind nur zwei elementare Pa- 
rameter, nämlich die Tonhöhe 
und die Lautstärke, notwendig. 
Die Angabe der Lautstärke gilt 
dabei gleichzeitig für beide Ton- 
generatoren, so daß sie nicht un- 
abhängig voneinander geregelt 
werden können. Zuständig sind 
für die Lautstärke die Bits 0 bis 3 
des Registers 17 (dez. 65297 / hex. 
$FF11). Da auch die übrigen Bits 
dieses Registers Steuerungsaufga- 
ben besitzen, ist in dieses Register 
unbedingt maskiert zu schreiben, 
damit die Bits 4 und 7 nicht beein- 
flußt werden. Mit den Bits 0 bis 3 
ließe sich die Lautstärke rein the- 
oretisch in sechszehn Stufen un- 
terteilen (vier Bits können sechs- 
zehn Zustände darstellen). Be- 
nutzt werden allerdings nur die 
ersten neun Stufen (also die Werte 
0 bis 8), wobei der Wert 0 für ab- 
solute Stille, und der Wert 8 für 
die maximale Lautstärke steht. 
Werte größer als 8 (also die Werte 
9 bis 15) ergeben gegenüber dem 
Wert 8 keine weitere Lautstärken- 
steigerung. Dieses Register kann 
natürlich nur eine relative Abstu- 
fung der Lautstärke steuern. Wel- 
che Lautstärke den einzelnen By- 
tewerten entspricht, entscheidet 
letztendlich die Stellung des Laut- 
stärkereglers an Ihrem Fernseher 
bzw. Monitor. Überprüfen Sie al- 
so zu allererst immer diese Ein- 
stellung, falls Ihr Computer ein- 
mal völlig stumm bleiben sollte. 
Die zweite zur Tonerzeugung auf 
dem C16 notwendige Größe ist 
die Tonhöhe bzw. -frequenz. Der 
TED stellt zur Darstellung der 
Frequenz jedes Tongenerators je- 
weils zehn Bits zur Verfügung. 
Da sich mit zehn Bits exakt 1024 
verschiedene Werte darstellen las- 
sen (0 bis 1023), können diese 
Werte nicht identisch mit den ei- 
gentlichen Frequenzwerten sein. 
Die entsprechende Umrechnungs- 
formel sowie eine Tabelle mit der 
Zuordnung ”Note - Soundregi- 
sterwert - Frequenz” finden Sie 
im Handbuch auf Seite 211. 

Der dort angedruckten Tabelle ist 
eigentlich wenig hinzuzufügen; 
für. Maschinensprachprogrammie- 
rer ist es sinnvoll, sich neben die 
dort abgedruckten Werte die Hex- 
Entsprechungen zu notieren - dies 
erspart einem ständiges Umrech- 
nen. Da sich zehn Bits bekannt- 
lich nicht in einem Byte darstel- 
len lassen, spaltet der TED die 
Frequenzwerte auf: Die unter 
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C-16 LISTINGS + CHECKSUMMEN (OC V1.0) 


100 REM HHRBHBIBHBRHEEE EEE 
110 REM * * 
120 REM * SOUND - TESTER * 
130 REM * * 
140 REM * FUER DEN C1/16 % PLUS/4 * 
150 REM * R * 
160 REM * * 
170 REM * (W) 86 BY D.D. & W.R. * 
180 REM + * 
190 REM HRBRRRIRBIRHHIHIIHTIIR III III HEN INE 
200 : 

210 =: REM VARIABLENDEFINITION 

220 : 

230 SCNELR:COLORO,1:COLOR4,1:COLOR1 ,6,4:6G0SUBF10 


240 WA(1) =0:WX(2)=0:W% (3) =0:W% (4)=0:W4.(5)=0:M=1 
250 POKE65294 „O: POKE65295 ,0: PDOKE65296 „O0: POKEA527 
7,0: POKE65298 ,PEEK (85298) AND2S52 

260 GOSUBS00:GDT0410 

270 
280 
290 
300 
310 
320 
330 
340 


REM HAUPTSCHLEIFE 


GETKEYG$:G=ASC (6$) 

D=1: IFM=30RM=STHEND=10 

IFG= 29THENW% (M) =W% (M) +D= GOTO480 
IFG=157THENW% (M) =W% (M) -D: GOTO480 
IFG=145THENGOSUB440: M=M-1:GOT0410 


350 IFG= 17THENGOSUB440: M=M+1:GOT0410 
360 IFG= SBTHENEND 

370 GOTOZ00 

380 = 

390 : REM EINSTELLGROESSE AENDERN 

400 : 

410 IFM<1THENM=5:ELSEIFM>STHENM=1 


420 FORT=3354+M*80TOSIS4+M#80+1 1: POKET ,PEEK(T)IOR 
128: NEXTT 

430 GOTOS00O : 
440 FORT=3354+M*80TO3SS54+M*80+11:POKET ,PEEK(T)IAN 
D127:NEXTT: RETURN 

450 : 

460 : 

470 : 
480 


REM PARAMETER AENDERN 


UONMGOSUBS40,600,680,750,840 

490 GOSURS500: GOTO300 

500 FORI=0T04:CHAR1 „3+7#1,23, "{SPACE}":PRINTUSIN 

G"###" 3; PEEK (65294+1) 2NEXT 

10% 

520 = 
30 : 

540 I 
o 

550 POKE6S297 „ (PEEK (65297) AND240) ORWA. (1) 

560 CHAR1,15,9, "{SPACE}" :PRINTUSING"H#H#" 5 WA (1): 
RETURN 

570 : 
S80 : 

S90 3 

600 I 
o 

610 CHAR1,15,11,"{SPACE}" 

620 IFW% (2) =OTHENPOKE65297 „PEEK (65297) AND239: PRI 
NT" {SPACE}AUS" 

630 IFWA (2) =1THENPOKE65297 ‚„PEEK (65297) 0R1&: PRINT 
"LSPACEZYIAN" 

640 RETURN 

650 
660 
670 . 

680 IFWA ZI <OTHENWA (3) =10235: ELSEIFWA (3) >1LO2STHEN 

WALZI=O 

690 H%=INT (W%. (3) 7256) :L%=W% (3) -H7#256 

700 FOKE&5294 ,„L%: POKE6#5298, (PEEK (65298) AND252) OR 

H% 

710 CHAR1,15,13, "{SPACE}" :PRINTUSING"#H##";W%. (3) 
»RETURN 

720 : 
730 
740 : 

750 I 

° 

760 CHAR1,15,15,"{SPACE}" 

770 1FW%(4) =0THENPOKE65297 „PEEK (652977) AND159:PRI 

NT" {SPACEIAUS" 

780 IFWZ4(4)=1THENPOKE65277 „ (PEEK (45297) AND159) OR 


REM LAUTSTAERKE 


FWACLI<SOTHENWA (1I)=B:ELSEIFWA (1) >BTHENWZ (1)= 


REM TONGENERATOR #1 


FW% (2) <OTHENWA (2) =13ELSEIFW% (2), >1 THENWA (2) = 








REM FREQUENZ STIMME #1 





REM TONGENERATOR #2 


FW (4) SOTHENWA (4) =2:ELSEIFW% (4) >2THENWY (4)= 


GSompuhe mih 


<211> 
<207> 
<235> 
<227> 
<239> 
<2477> 
<1> 


"<86> 


<21> 
<45> 
<2> 
<121> 
<22> 
<92> 
<186> 


<158> 
<72> 
<73> 
<249> 
<93> 
<165> 
<138> 
<100> 
<141> 
<180> 
<250> 
<250> 
<178> 
<183> 
<171> 
<203> 
<229> 


<A8> 
<238> 


<145> 
<253> 
1797 
<17> 
<244> 
<31> 


<63> 
<37> 
<86> 
<78> 


<32> 
<200> 


<16> 
<118> 
<81> 
<138> 


<126> 
<182> 


<11> 


<179> 
<16> 
<198> 
<8> 
<218> 


<75> 
<207> 


<148> 
<105> 
<12> 
<247> 
<32> 


<206> 
<108> 


<200> 



































32:PRINT"{SPACEITON" <160> 
790 IFWZ (4) =2THENPOKE65297 „ (PEEK (65297) AND15F) OR 

64:2 PRINT" {SPACE}IRAU" <254> 
800 RETURN <177> 
810 : <103> 
820 = REM FREQUENZ STIMME #2 <187> 
830 : <123> 
840 IFW%. (5) <OTHENWA (5)=1023:ELSEIFWA (5) >1023THEN 
WASI=O <142> 
850 H%A=INT (WA (5) /256) =L%4=W%.(5) -HA#256 <176> 
860 POKE65295,1L%:POKE65296,H% <45> 
870 CHAR1,15,17,"{SPACE}" sPRINTUSING"##HH#";W2.(5) 
:RETURN <94> 
880 : <173> 
890 .z REM BILDAUFBAU <19> 
900 z . <193> 
10 As" RRRBRRRRHERIHRIHRIRIEIEREÄIE I SHHEIEHEI SEITEN HEINE" 7 C32> 
920 B$="#{SPACEITI#" <123> 
9730 FORI=OTD24: CHAR1,0,1,B$:NEXTI <216> 
940 CHAR1,0,0,A$:CHAR1,0,6,A$3CHAR1,0,7,A$:CHAR1 

„0,24 ,A$:CHAR1,0,19,A$ <o> 
950 CHAR1,6,03,"S{SPACEIOTSPACEYULSPACEYIN{SPACEI 
DISPACE2>-{SPACEZYT{SPACEYETSPACEIS{SPACEITISPAC 
EIETSPACEIR" . <211> 
960 CHAR1,2,09,"LAUTSTAERKE{SPACE}: LSPACE4IOTSPA 

CE} 0-8)" : <25> 
970 CHAR1,2,11,"STIMME{SPACEI#1{SPACE3}I: TSPACE2} - 
AUS{SPACE} (AUS/AN)" j <237> 
980 CHAR1,2,13, "FREQUENZ {SPACEISI{SPACE}IT TSPACE4 
30t1SPACE} (0-1023)" <99> 
9970 CHAR1,2,15,"STIMMEISPACEIR2TSPACE3Y: (SPACE2}Y 
AUSTSPACE} (AUS/TON/RAUSCH) " <175> 
1000 .CHAR1 ,2,17, "FREQUENZ {SPACE}S2{SPACE}: {SPACE 
430LSPACE} (0-1023J " <167> 
1010 CHAR4 „3,21, "65294 1SPACE2IH52IITSPACE2I65296 
{SPACE2365297 {SPACE2}65298" " <160> 
1020 CHAR1,3,22,"---—— {SPACE2I--———- {SPACE2I----—- 
tSPACE2I--——— tSPALE2I--——— = <129> 
1030 RETURN <152> 
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Listing 8 


en acht Bits (Bit O bis 7) werden in 
einem gesonderten Register abge- 
legt, und für die beiden oberen 
Bits (Bit 8 und 9) werden in einem 
anderen Register zwei Bits reser- 
“ viert. So enthält Register 14 (dez. 
65294 / hex. $FFOE) die unteren 
acht Bits der Frequenz des ersten 
Tongenerators, und die BitsO und 
1 des Registers 18: (dez. 65298 / 
hex. $FF12) stellen die beiden 
höchstwertigsten Bits der Fre- 
quenz dar. Da die übrigen Bits des 
Registers 18 andere, sh wichtige 
Steuerungsaufgaben übernehmen, 
ist in dieses Register ausschließ- 
lich maskiert zu schreiben. Die 
Frequenz des.zweiten Tongenera- 
tors wird entsprechend aufgespal- 
ten im Register 15 (dez. 65295 / 
hex. $FFOF) und in den Bits O und 
1 des Registers 16-(dez. 65296 / 
hex. $FF10) abgelegt. Die übrigen 
Bits des Registers 16 sind bedeu- 
tungslos, so daß sie beliebig über- 
schrieben werden können; beim 
Lesen sind diese Bits immer aus 1 
gesetzt. Nachdem die grundlegen- 
den Parameter für die Tonerzeu- 
gung festgelegt sind, kommen wir 
nun zu den eigentlichen Steuer- 
bits. Damit sind die Bits 4 bis 7 
des Registers 17 (dez. 65297 / hex. 


$FF11) gemeint. Mittels dieser 
Bits lassen sich die beiden Tonge- 
neratoren unabhängig voneinan- 
der ein- und abschalten. Bit 4 
übernimmt dabei die Steuerung 


des Tongenerators 1. Bei gesetz- 


tem Bit ist der Tongenerator ein- 
geschaltet, erzeugt also einen den 
Parametern entsprechenden Ton. 
Dieser bleibt solange eingeschal- 
tet, bis das Bit wieder zurückge- 


‚setzt, also gelöscht wird. Folglich 


kann bei der direkten Bedienung 
des Tongenerators - anders als bei 
der- Bedienung durch den Basic- 
Befehl SOUND - die Tondauer 
nicht per Parameter gesteuert 
werden, sondern muß per Pro- 
grammschleife programmiert 
werden. Der Tongenerator 1 
kann ausschließlich Töne erzeu- 
gen. Anders der Tongenerator 2, 
der sowohl als auch Geräusche er- 
zeugen kann.»Bit 5 des Registers 
17 ist für den Ton, Bit 6 desselben 
Registers für das Rauschen zu- 
ständig. Bei gesetztem Bit 5 (und 
gelöckeera Bit 6) erklingt ein 
Ton, bei gesetztem Bit 6 (und ge- 
löschtem Bit 5) ein Rauschen. 
Setzt man beide Bits zurück, ver- 
stummt der Tongenerator 2 gänz- 
lich. Sind auf der anderen Seite 
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beide Bits gesetzt, so wird ein Ton 
erzeugt, das heißt, der Zustand 
von Bit 6 wird in diesem Fall 
nicht beachtet. Bit 7 des Registers 
17 übernimmt ebenfalls eine 
Schalterfunktion. Ist dieses Bit ge- 
setzt, wird eine Sounderzeugung 
durch denTED - unabhängig von 
den übrigen Registerinhalten, also 
auch unabhängig von den Zustän- 
den der Bits 4, 5 und 6 dieses Regi- 
sters - gänzlich unterdrückt, das 
heißt, der TED bleibt völlig 
stumm. Ist dieses Bit gelöscht, 
wird die Sounderzeugung ent- 
sprechend den übrigen Parame- 
tern freigegeben. Dies ist: bei- 
spielsweise dann sinnvoll, wenn 


man zur Voreinstellung der Para- 


meter erst einmal beide Tongene- 
ratoren ausgeschaltet haben will, 
um sie dann exakt gleichzeitig zu 
aktivieren. 


Nun sind alle Tonregister und so- 
mit alle Grundlagen der Toner- 
zeugung mit dem TED geklärt, 
und wir können zur praktischen 
Erprobung des Gesagten überge- 
hen. Geben Sie dazu bitte Listing 
8 ein. REM-Zeilen können Sie da- 
bei ersatzlos weglassen., sie die- 
nen nur der Übersichtlichkeit des 
Listings und sind. für den Pro- 
grammablauf unrelevant. Wenn 
Sie das Programm nun mit RUN 


starten, werden im unteren Bild- 
schirmteil die Registerinhalte der 
für die Tonerzeugung wichtigen 
Register angezeigt. Im mittleren 
Bildschirmteil kann man die ent- 
sprechenden Werte bzw. Zustän- 
de der einzelnen Parameter able- 
sen: Lautstärkewert, Zustand des 
1. Tongenerators, Frequenz des 1. 
Tongenerators, Zustand des 2. 
Tongenerators und schließlich die 
Frequenz des 2. Tongenerators. 
Mit den Cursortasten können Sie 
diese Parameter nun beliebig ver- 
ändern: Mit ”oben/unten” wäh- 
len Sie den entsprechenden Para- 
meter aus (wird revers agezeigt) 
und verändern ihn dann mit 


kurs 


rechts/links”. Die Lautstärke 
läßt sich schrittweise von O bis 8 
regulieren, die Frequenzen in 
Zehnerschritten von 0 bis 1023, 
und die möglichen Zustände der 
Tongeneratoren sind AUS, TON 
und beim 2. Tongenerator zusätz- 


lich RAUSCHEN. 


Probieren Sie mit diesem Pro- 
gramm nach Herzenslust herum 
und behalten Sie dabei immer die 
angezeigten Registerinhalte im 
Auge. 


Dann sollten Ihnen die oben er- 
klärten Zusammenhänge auch in 
der Praxis schnell klar werden. 
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Jetzt ziehen wir alle Register! 


Einen Computer in Naschinensprache zu programmieren ist nur dann sinnvoll, wenn 
man eine gewisse Kenntnis des Betriebssystems und Systemspeichers des jeweiligen 
Gerätes besitzt. Man kann dann bequem auf computerinterne Maschinenroutinen zu- 
rückgreifen ohne jedesmal "das Rad neu erfinden’ zu müssen. Im Bezug auf den 
C16/116 und plus/4 sind Informationen in dieser Richtung jedoch äußerst rar, 
deshalb hier eine Zusammenstellung einiger wichtiger und nützlicher Betriebs- 
systemroutinen, die sich allesamt sehr gut in eigenen Maschinenprogramnen ver- 
wenden lassen. 





TIPS UND TRICKS FÜR DEN COMMODORE 16/116 UND plus/4 WON WALDEMAR RAAZ 


SSSEISSSISEESERESSSESSEESEIEBESESSSISSESEESSEESIEESSENSBESEISEISENEEBENERBEZIBEN 


=WICHTIGE BETRIEBSSYSTEMROUTINEN= 


SESSEHEBIESZESSSSSESESENZESSEESSS 


Adresse | Adresse | ' 
hex I dez I evt. Label | Beschreibung 
SZEEISBZIZESSABSBEISSZERZZEIZUSSEIEBESSSHBIZENBESSSSTEZESSSSTEEIEEBEISSRNRZUUNIERZERN 
>9491 1338033 I CHKCOM I Das nächste Zeichen aus dem Basic-Text wird 
l t I gelesen und auf Komma geprüft. Handelt es sich 
1 1 I um ein anderes Zeichen, erfolgt ein’ SYNTAX- 
ı t I Error und das Programm bricht ab. 
23486 1738027 I I Es wird ein entsprechender Test für "Klammer 
l q I zu" durchgefiihrt. 
>9488 | >38039 I Es wird ein entsprechender Test für’ "Klammer 
l I auf" durchgeführt. 


39484 >40324 


ı 
' 
1 
1 
1 
1 
ı 
ı 
1 
ı 
ı 
1 
1 
' 
1} 
1 
1 
1 
1 
1 
1 
1 
fi 
ı 
1 
1 
1 
1 
' 
ı 
i 
ı 
ı 
1 
i 
1 
i 
ı 
ı 
' 
i 
ı 
ı 
ı 
1 
i 
1 
H 
’ 
1 
i 
fi 
3 
ı 
1 
ı 
1 
i 
i 
L 


I Mit dieser Routine läßt sich eine sehr komfor- 
Ütable Parameterübergabe von Basic an Maschi- 

I nensprache realisieren. Aus dem Basic-Text 

I wird ein Ein-Byte-Zahlenuert ausgelesen. Liegt 
I der Wert nicht in dem Bereich. von @ bis 255, 

I so wird ein ILLEGAL QUANTITY-Error ausgegeben. 
I Ansonsten steht der Wert im X-Register zur 

I Yerfligung. 

I Diese Routine gleicht der Routine GETBYT, nur 

I wird hier ein Zwei-Byte-Zahlenwert ausgelesen, 
I der sich im Bereich 0-65535 bewegen darf. Bei 

I Befeichsunter- oder -überschreitungen erfolgt 
ı 
! 
j 
l 





ein ILLEGAL QUANTITY-Error. Ansonsten steht 
der: Zahlenwert nach Durchlaufen der Routine 
in den Speicherzellen hex.14/15 (dez.20/21) 
in Low-/Highbyte-Darstellung zur Verfügung. 


>9dd2 249482 GETPAR I Es werden folgende Routinen nacheinander 
I. durchlaufen: GETADR,CHKCOM,GETBYT. 
I Das Betriebssystem benutzt diese Routine bei- 
I spielsweise, um die Parameter beim POKE- 
I Befehl auszuwerten. 

>9dd8 1 340488 | I Nacheinander werden CHKCOM und: GETBYT abgear- 
beitet. 


>9dde 1 >48414 | I Nacheinander werden CHKCOM UND GETADR abgear- 
ı l I beitet. 


>d88b 


r 


I Wertet einen beliebig verschachtelten oder 

I verklammerten numerischen Ausdruck aus. Mit 

I der Routine CHKADR (hex.9de4/dez.40420) kann 
I dann eventuell eine Bereichsprüfung auf Zuei- 
I Byte-Zahlenwert durchgeführt werden. 


I Der Cursor wird in der linken oberen Ecke des 
I Bildschirms positioniert. Ein Aufruf dieser 
I Routine entspricht in der Wirkung dem Betäti- 
I gen der Home-Taste im Direktmodus. 
355435 1 CLRHOM I Der Bildschirm wird vollständig gelöscht und 
l I und der Cursor wird wie bei HOME in der linken 
' I oberen Bildschirmecke positioniert. Diese 
1 I Routine entspricht der CLR-Taste im Direkt- 
I modus. 











>daf? 1 356055 I I Löschen einer beliebigen Bildschirmzeile. Die 
ı l I Nummer der zu. löschenden Zeile (6-24) muß vor 
l l I dem Aufruf der Routine in das X-Register ge- 
l l I laden werden. 

>88c?7 1335015 1 I Mit dieser Routine körnen beliebige Speicher- 
j 1 I blöcke frei verschoben werden; dazu müssen, 
l ı I bevor die Routine aufgerufen wird, folgende 
l l I Parameter gesetzt sein: 
l 1 I hex.5f/69 - alter Blockanfang 
\ ! l S5a/5b - altes Blockende+1 
l ı 1 
l j ı 2.559 - neues Blockende+l 

>903e >3692€ Dyrch den Aufruf dieser Routine bewirkt man 





1 

! die Ausgabe eines “Carrige Return’ gefolgt von 
I einem “Linefeed“ auf dem gerade aktivierten 

I Ausgabegerät (normalerweise ist die der Bild- 
I) 

l 


schirm). Man schließt auf diese Weise eine 


gan ab und gelangt in die nächste Zeile. 











I-Diese Routine gibt eine 16-Bit-Integerzahl 
I ohne Worzeichen auf dem Bildschirm aus. Der 
I Zahlerwert wird dazu im #-Register/Akku in der 
l =Hiahb -Darstellung übergeben. 









Aus dem Basic-Text wird ein String ausgelesen 
und anschließend ausgewertet. Die Routine 
nach erfolgreichem Ablauf folgende Parameter 
zur Werfügung: Akku - Stringlänge 
*-Register - Adresse/Low-Byte 
Y-Register - Adresse/High-Byte 
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I Diese Routine gibt einen String auf dem Bild- 
I schirm aus. Dazu muß der String irgendwo im 

I Speicher im ASCII-Format stehen und mit einem 
I Nullbyte abschließen. Außerdem müssen der 

I Routine wor dem Aufruf folgende Parameter 

I übergeben werden: 

I Akku - Anfangsadresse des Strings/Low-Byte 
I Y-Reg. - Anfangsadresse des Strings/High-Byte 


23 
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24 


I Handelt es sich bei der Ausgabe um einen 
I String, der mit der Routine bei hex.9c48 aus- 
I gewertet wurde, so gilt folgende Einsprung- 
I adresse: hex.998b - dez.37083. 
Diese Routine bindet die vorhandenen Basic- 
Programmzeilen neu. Alle Linkadressen werden 
neu. berechnet und gesetzt. Nach Ablauf der 
Routine steht in den Speicherzellen hex.22/23 
die neue Endadresse des Basic-Programms. 
Nach dem Binden der Programmzeilen paßt diese 
Routine den Zeiger auf das Basic-Ende bzw. 
den Variablenanfang neu. 

28393 1 235475 I Entsprechend gleicht diese Routine die übrigen 

l I I Basic-Pointer an die veränderte Speicherauf- 
! I I teilung an. - 

ee ee EN 

>8703 334563 Über diese Adresse gelangt man in den READY- 
Modus. Hier muß man natürlich mit einem JMP- 
aufrufen, da es sich hier nicht um eine Unter- 
routine handelt. Ein solcher Einsprung ist 
z.B. dann sinnvoll, wenn man das C16-Basic 
etwa um einen OLD - Befehl erweitert, da 
bei diesem Befehl nicht zurückverzueigt wird. 
I Diese Routine liest aus dem laufenden Basic- 
I text die Parameter für LOAD, SAVE oder VERIFY 
l 
l 





>884b 


>336b 243115 


- 
oO 
[I 
2” 
3 


aus (Prg.name,Geräteadr. ‚Sekundäradr.) und 
und besetzt die entsprechenden Speicherzellen. 


._ ann nn nenn mm. [nun nn 


>9431 1338949 I ! Diese Routine gibt einen SYNTAX-Error aus. 


ginn nn nn a 


>991c 1 339196 Ausgabe : ILLEGAL QUANTITY - Error 


-— = - 1... .-.-- - 







>9324 1 >37668 I I Ausgabe : TYPE MISMATCH - Error 
en a NE EEE 
39327 _ 1 337671 I - I Ausgabe FORMULA TOO COMPLEX - Error 
Banana nn Emma nn nn nn nn 
>»B633 1 >34425 | ERROR I Diese Routine dient zur allgemeinen Fehlerbe- 
ung, De rn GE 


I #-Register die Fehlernummer (s.Handbuch $.284) 
I übergeben werden. 
SSESSESSSEBESSBESCERISERTEEEZEISSZESESERSES 
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= TEL - REGISTER 





IAdresse IAdressel 
Registerl hex I dez I Beschreibung 






I >ff88 I 65288 | Low-Byte des Timers # 


I High-Byte des Timers #1 


21 I >rfo1 -1 65281 





»2 I >#F02 | 65282 | Low-Byte des Timers #2 


03 1 >f803 | 65283 | High-Byte des Timers #2 


24 1 >rf84 1 65284 1 Low-Byte des Timers #3 





85 1.387805 I 65285 I High-Byte des Timers #3 
Ge Er ge ee ER En en ey Br, 
086 I >ff96 1 65286 I Bits6-2: Smooth Scrolling des normalen Textbildschirms 
3 I 1 ı : in vertikaler Richtung 
ı Bit » Schaltbit für Anzahl der Bildschirmzeilen 
U 8 = 24 Zeilen 
ı 1 = 25 Zeilen 
ı : Schaltbit für Bildschirm an/aus 
ı 8 = Bildschirm /aus’ 
ı 1 = Bildschirm ‘an’ 
I * Schaltbit für hochauflösenden Grafikmodus 
h 8 = Hochauflösungsmodus aus 
ı „} = Hochauflösungsmodus ein 
1 : Schaltbit f. erweiterten Hintergrundfarbmadus 
ı 8 = ausgeschaltet 
! 1 = eingeschaltet 
1} : Dieses Bit muß beim Betrieb auf Null gesetzt 
ı sein, ansonsten erscheinen auf dem Bildschirm 
j seltsame Muster. 


Smooth Sgrolling des normalen Textbildschirms 
I in horizontaler Richtung 

: Schaltbit für Anzahl der Bildschirmspalten 

I 6 = 38 Spalten 

ı 1 = 48 Spalten 

' * Schaltbit für Mehrfarbmodus 

s 9 = Mehrfarbmodus “aus’ 

' 1 = Mehrfarbmodus an’ 

U : Dieses Bit muß beim Betrieb auf Null gesetzt 
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! sein, da sich der Computer sonst verab- 

j schiedet und erst durch einen Reset wieder 

t zum Leben erweckt wird. 

I Bits Dieses Bit muß beim Betrieb ebenfalls auf 

I Null gesetzt sein. Eine Eins in dieser Zelle 
I . schaltet nämlich auf NTSC-Fernsehnorm um. 

) Eine Null steht für_die heimische PAL-Norm. 
l « Dieses Bit bestimmt, ob ein Zeichen auf dem 
I Bildschirm normal oder revers ausgegeben 

! wird. Beim Ci6 werden reverse Zeichen anders 
ı als etwa beim C64 oder YC29 hardwaremäßig 

1 erzeugt. 


nn nn —————unmunnm 


Bit? 


08° I >ff08 | 65288 | Dieses Register wird beim [16 dazu benutzt, die Tasta- 
1 A I tur sowie die beiden Joystickports abzufragen. 
83 1 37709 | 65289 | Die Bits dieses Registers werden beim Auftreten des 
ı j I entsprechenden Interrupts gesetzt: 
1 I I Bit® : unbenutzt 
ı j I Eiti : Rasterinterrupt 
U l I Bit2 : Lichtgriffelinterrupt (beim C16 nicht imple- 
ı ' ! mentiert) 
j j I Bit3 : Timer #1 ist auf Null dekrementiert 
' ' I Bit4 : Timer #2 ist auf Null dekrementiert 
ı l I Bit5 : unbenutzt 
ı j I Bit6 : Timer #3 ist auf Null dekrementiert 
' 1 I Bit? : Interrupt-Flagge - wird gesetzt. sobald ein Bit 
1 1 1 


dieses Registers gesetzt wird 


| Dieses Register ist das zu Register 99 gehörige Mas- 

I kenregister. Die in 89 genannten Interruptquellen 

I lassen sich mit diesem Register sperren bzw. frei- 

I geben. Ein ungesetztes Bit sperrt den jeweiligen .In- 

I terrupt, ein gesetztes gibt ihn frei. Die Bedeutung 

I der einzelnen Bits entspricht der Belegung bei Reg.89; 
I bis auf Bit®, das zum nachfolgenden Register gehört. 


Dieses Register enthält die Nummer .der Rasterzeile. in 
der der nächste Rasterinterrupt ausgelöst wird. Da 


>ffob | 65251 I 
1 
I 312 Zeilen erzeugt werden. reicht ein 8-Bit-Register 
1 
l 


zur Darstellung nicht aus. daher wird Bit@ aus Rea.18 
3ls msb (most significant bi 





hinzugezogen. 


=. 2... 2-2. 2-2 Ammann ne nenne 


12 f >FFBc 1 65292 I 
ı 1 I 


Bit6 und 1 dieses Register stellen eine Ergänzung des 
folgenden Register um zwei Bits dar (BitS und 9): 
womit sich insgesamt ein 18-Bit-Register ergibt, 






Lieses Register enthält die PitsG-7 der Position des 
Hardware Lursors. 








16 I >rf1a 1 65296 | Die Bits6 und 1 dieses Registers ergänzen Register15 
! 1 I um zwei Bits (Bits® und 9. 
17 I >FF11 1 65297 1 BitsQ-2: Lautstärke - gilt für beide Tongeneratoren 
i l “I Bit3 : nicht benutzt 
ı ' I Bit4 * Schaltbit für den 1.Tongenerator 
i ı ı + - Stimme#i1 ein 
' 1 U a - Stimmetl aus 
' ! 1 Bit5S : Schattbit für den 2. Tongenerator 
i ' j Inhalt wie Bit4 
U t I Bit6 : Schaltbit für den Rauschgenerator 
' ’ I Inhalt wie Bit4 
’ r I Bit? : Beim Betrieb der Tongeneratoren muß dieses 
[j [j 1] Bit gelöscht sein. Ist es gesetzt, sind alle 
ı 1 ) Tongeneratoren abgeschaltet. 
18 I >ff12 1 65298, I Bits6-1: Bits& und 9 der Frequenz des 1.Tongenerators 
1 I Bit2 : Schaltbit für ROM-/RAM-Bank : 
U I l 8 - Daten aus RAM 
' Li ! 1 - Daten aus ROM 
' ı I Bits3-5: Basisadresse der Bit-Map (Speicherraun für 
ı U ' hochauflösende Grafik? 
t I I Bits6-7: nicht benutzt 
19 I >rf12 I 65299 I Bits@-1: Die Bedeutung dieser Bits habe ich noch nicht 
1 j ' exakt klären können. 
ı U I Bits2-7: Basisadresse der Character-Tabelle (Zeichen- 
ı I l muster) 
29 I >ff14 165308 I Bitsß-2: nicht benutzt 
l U I Bits3-7: Basisadresse des Bildschirmspeichers im Text- 
ı j l modus r 
21 I >Ff15 1 65301 I Farbregister#1 (Hintergrundfarbe#) 
) ı I Bits@-3: Farbe” 
1 1 I Bits4-6: Luminanz 
1 ı I Bit? ® nicht benutzt 
22 ı >rf16 I 65382 I Farbregister#2 (Hintergrundfarbe#i) 


I 1 I Inhalt wie Register 21 
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23 I >rf17? 1 65393 | Farbregister#3 (Hintergrundfarbe#2) 29 I >ffid 1 853989 I Dieses Register (in Verbindung mit Bit des, vorher- 
1 1 I Inhalt wie Register 21 e ! l "1 gehenden Registers) enthält die Nummer der Raster- 
Tune m nn nn 1 r I zeile, die auf dem Bildschirm gerade erzeugt wird. 
24 1 >ff18 | 65294 | Farbregister#4 (Hintergrundfarbe#2) EEE TEE Benz 
I ! ! Inhalt wie Register 21 . 30 1 >ffle 1.653189 I Dieses Register enthält entsprechend die Rasterspalte: 
nun nennen nn nn nn nn en nennen nme 1 [} I «es wird vom L16-Betriebssystem aber scheinbar nicht 
25 1 >ef19 I 65305 I Farbregister#5 (Rahmenfarbe> } 1 I genutzt. 
U l I Inhalt wie Register 21 ee 1er te leer a ann Se re ehgechelet 
a Brenn en Is aka pun an ndta nee er eie  erieenen mein seEhdeniehen eb sro eirergEn meiner eo nenn re en nommen Teer sera 3 >HFif 1 65211 1 Dieses Register wird wom C16-Betriebssystem scheinbar 






nicht genutzt. 


1 
26 I >ffia 1 65306 | Dieses Register wird vom C16-Betriebssystem scheinbar U 
I Bitsö-3: Blinkffequenz 
1 
ı 


l 
l 
ı l I nicht genutzt, l 
I 
I 







Bits4-7: Diese Bits zählen die 3 Rasterzeilen. die 
ig sind hoch. 
SSSSESEISS5SEIE52 






für ne Bildschirmzeile 





2? ı >rrib 1 65307 | Dieses Register wird wom C16-Betriebssysten scheinbar 
I 1 I nicht genutzt. 
















Das Bit® dieses Registers ergänzt Register 29 um ein 
l ! I Bit (most significant bit?, 





Waldemar Raaz 


DATAMAKER 


Basiclistings von MC-Programmen 
schnell und komfortabel erstellt! 


Bekanntlich hat der C16/116 ei- 
nen Maschinensprachemonitor 
eingebaut, den TEDMON. Lei- 
der fehlt dem Monitor ein Befehl, 
mit dem man Speicherbereiche in 
Datazeilen ablegen kann. Dies ist 
immer dann notwendig, wenn 
man Maschinensprache und Basic 
kombinieren will, dann ist näm- 
lich ein Basic-Loader nötig, der 
die Daten aus Datazeilen in den 













FREUEN EN EEE EEE NEE EEE EEE IE 


DATA-MAKER FUER DEN COMMODORE 16/116 





BELEGT WIRD DER SPEICHERBEREICH VOM 818 BIS 989 
SYNTAX: SYSB18,AW,EW,SZ 
€ AW-ANFANGSWERT / EW-ENDWERT / SZ-STARTZEILE ) 


FREE 


WRITTEN 1986 RY WALDEMAR RAAZ 
ERINNERN IE EHEN IE NIE NIEREN IT NIEREN IE IE IRRE IE RE NEUERE NSIEHEAENESE REINE IEIEIE HEINE ICE 


o 

1 %* 
2 * 
3 * 
4 * 
5 * 
6 * 
7 D: 
8 * 
u 






: 5 5; R E 10000 DATA 20,00,03 :REM JSR $03D0 3: STARTWERT HOLEN 
N Speicher überträgt. Blieb euuem 10002 DATA 8D,71,03 zREM STA $0371 ; UND ZWISCHENSPEICHERN 
; bisher nichts anderes übrig, als die 10004 DATA 80,72,03 :REM STY $0372 3 
i Daten von Hand in Datazeilen 10005 DATA 20,D0,03 zREM JSR #0ID0 ; ENDWERT HOLEN 
: einzutippen, eine sehr mühsame 10008 DATA 85,D8 ıREM STA $DB s UND ZWISCHENSPEICHERN 
ren : 10010 DATA 84,09 :REM STY $D9 3 
und fehlerträchtige Arbeit, so’ ei= 10012 DATA 20,D0,03 :REM JSR $03D0 3 STARTZEILE HOLEN 
ledigt diese Routine nun diese 10014 DATA AO,00 :REM LDY #500 3 a 
Aufgabe. Der vorliegende Data- 10016 DATA A9,83 :REM LDA #$83 ; TOKEN FUER ’DATA” AN DEN BEGINN 
mäker hat gegenüber anderen 10018 DATA 99,00,02 :REM 5TA $0200,Y ;.DES EINGABEPUFFERS SCHREIBEN 
hei Shöidenden V 10020 DATA AD,72,03 :REM LDA $0372 5 ENDWERT. SCHON ERREICHT 77 I 
noch einen entscheidenden Vor- 10022 DATA C5,D7 sREM 'CMP $D9 3 
teil: er arbeitet sehr schnell. Er ist 10024 DATA 90,10 :REM BCC $0363 5 NEIN, DANN WEITERMACHEN 
nämlich vollständig in Maschi- 10026 DATA D0,07 :REM BNE $035C 3 
nensprache geschrieben und ent- 10028 DATA AS5,D8 :REM LDA $DB 5 
end cheell, Die Mach: 10030 DATA CD,71,03 :REM CMP $0371 5 
sprechend schnell. Die Maschi- 10032 DATA RO,07 :REM BES $0363 ; 
nenroutine steht letztlich im Kas- 10034 DATA CO,00 :REM CPY #300 ; JA, TEST AUF ZEILE IM EINGABEPUFFER & 
£ settenpuffer, was folgende 10036 DATA DO,SF :REM BNE $039F ; POSITIV, DANN ZEILE NOCH EINBINDEN 
i Konsequenzen hat: 10038 DATA 40,03,87 :REM IMP $8703 5 NEGATIV, DANN IN DEN READY-MODUS 
10040 DATA A5,15 :REM LDA $15 3 ZEILENNUMMER NOCH IM ERLAUBTEN 






: : 10062 DATA 20,CE,A2 :REM JSR $A2CE 
das Programm nicht als reine 10064 DATA 20,71,A4 :REM JSR $A471 
Maschinenroutine abspeichern, 10066 DATA A4,DA :REM LDY $DA 


--> FACE MIT NULLEN AUFFUELLEN 
--> FACE NACH ASCII WANDELN 


{ = 10042 DATA £9,FA :REM CMP #$FA ; BEREICH ?? 
i - Daten, die im Kassettenpuffer 10044 ‚DATA 90,03 :REM BEC $0S6C 5; 
angesiedelt sind, lassen sich mit 10046 DATA 4C,1C,99 :REM JMP $971C 5 NEIN, DANN "ILLEGAL GUANTITY ERROR’ 
deser Routine nicht bearbeiten. 10048 DATA 84,DA :REM STY $DA 3 
E x 10050 DATA A9,00 :REM LDA #$00 ig 
en Bee am 10052 DATA AE,00,00 :REM LDX $0000 3; AKTUELLES BYTE HOLEN 
te speicherbereich ın Vatazel- 10054 DATA 85,62 REM STA #62 3 UND ZWISCHENSPEICHERN 
len ablegen. 10056 DATA 86,63 3REM STX $63 F > 
10058 DATA A2,70 zREM LDX #$90 F 
- Kassettenanwender können 10060 DATA 38 :REM SEC s 
5 
3 
3 
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da dazu der Kassettenpuffer be- 
nötigt würde. Sie müssen jedes- 
mal, bevor sie das Programm 
benutzen, den Basic-Loader la- 
den und starten. 


Diskettenanwender dagegen ha- 
ben die Möglichkeit, das Pro- 
gramm als reine Maschinenrouti- 
ne auf Diskette zu speichern; es 
belegt in der Form nur einen 
Block, was sich entsprechend an- 
genehm auf die Ladezeit aus- 
wirkt. Gehen Sie also wie folgt 
vor: 


- Geben -Sie den abgedruckten 


Basic-Loader ein und speichern 
sie ihn zur Sicherheit ab. Alle 
REM-Anweisungen und Dop-. 
pelpunktzeilen können Sie da- 
bei weglassen; sie sind für den 
Programmablauf nicht rele- 
vant und dienen nur der Über- 
sichtlichkeit. 

Starten ‚Sie das Programm mit 
RUN. 

Es dauert einen Augenblick, 
bis die Data-Werte eingelesen 
sind. Dann haben Sie entweder 
Pech gehabt und Ihnen ist in 
den Datazeilen ein Tippfehler 
unterlaufen, das Programm 
gibt dann die entsprechende 
Meldung aus und stoppt, oder 
aber Sie haben keinen Fehler 
begangen und alles richtig ein- 
getippt; dann erscheint die Fra- 
ge ”Abspeichern (j/n)?”. 
Kassettenanwender müssen 
hier - wie gesagt - leider ein 
>N” für nein eingeben. Disket- 
tenanwender legen eine Dis- 
kette ein und drücken ”]J” für. 
ja. Wenn alles in Ordnung ist, 
wird die Routine nun als reines 
Maschinenprogramm unter 
dem Namen ”DATAGEN. 
CODE?” auf Diskette abgespei- 


chert. Es ist in der Form sehr 


.kurz und belegt nur einen 


Block. 


Für die spätere Anwendung ge- 
hen Sie bitte wie folgt vor: 
- Kassettenanwender laden und 


starten den Basic-Löader. Dis- 
kettenanwender laden die Ma- 
schinenrroutine absolut ein: 
LOAD’”’DATA- 
GEN.CODEF’”,8,1. 

Danach geben Sie NEW ein, 
um den Basic-Loader zu lö- 
schen bzw. die Basicpointer 
wieder zu normalisieren. 
Starten Sie die Maschinenrou- 
tine mit folgender Syntax: 
SYS818,AW,EW,SZ. 


10088 
10070 
10072 
10074 
1007& 
10078 
10080 
10082 
10084 
10085 
10088 
10090 
10092 
10094 
10096 
10098 
10100 
10102 
10104 
10106 
10108 
10110 
10112 
10114 
1011& 
10118 
10120 
10122 
10124 
10126 
10128 
‚10130 
10132 
10134 
10136 
10138 
10140 
10142 
10144 
10146 
10148 
10200 
10210 
10220 
10250 
10240 
10250 
10250 
10270 
10280 
10290 
102997 
10300 
10305 
10310 
10315 
10399 
10400 
10405 
10410 
10415 
10420 
10425 
10430 
10435 
10440 
10445 
10470 


10475. 


10480 
10485 
10490 
10495 
104997 
10500 


READY. 





DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


42,00 
EB 

c8 
BD,FF,00 
99,00,02 
DO,F& 
A9,2C 
99,00,02 
EE,71,03 
D0,03 
EE,72,03 
co,41 
90,AD 
A9,00 
99,00,02 
c8 

A? ,BD 
2,03 
8D,02,03 


:REM 
:REM 
:REM 
:REM 
»REM 
REM 
:REM 
ıREM 
:REM 
:REM 
:REM 
:REM 
ıREM 
ıREM 
ıREM 
«REM 
sREM 
:REM 


:REM' 


LDX 
INX 
INY 
LDA 


STA- 


BNE 
LDA 
STA 
INC 
BNE 
INC 
CPY 
BCC 
LDA 
STA 
INY 
LDA 
LDX 
STA 


#$00 


SOOFF „X 
$0200,Y 
$0384 
#32C 
$0200,Y 
$0371 
$039B 
$0372 
#541 - 
$O3AC 
#500 
$0200,Y 


#$BD 
#503 
+0302 


AKTUELLES BYTE IN DEZIMALER FORM 
IN DEN EINSABEPUFFER SCHREIBEN 


MIT KOMMA ABSCHLIESSEN 


AKTUELLE BYTEADRESSE ERHOEHEN 


EINGABEPUFFER SCHON VOLL 77? 

NEIN, DANN NAECHSTES BYTE AUSWERTEN 
JA, DANN EINGABEPUFFER MIT 

EINER NULL ABSCHLIESSEN 

UND LAENGE DER ZEILE BERECHNEN 
BASIC-WARMSTART-VEKTOR UMBIEGEN 


DATA 8E,03,03 
DATA A2,02 
DATA 86,30 
DATA A2,00 
DATA 86,3B 
DATA CA 

DATA 86,3A 
DATA 40,34,87 
DATA A9,12 
DATA A2,87 
DATA 8D,02,03 
DATA 8E,03,03 
DATA E6,14 
DATA D0,02 
DATA E6,15 
DATA 4C,45,03 
DATA 20,91,94 
DATA 20,14,93 
DATA 20,E4,9D 
DATA A5,14 
DATA 94,15 
DATA &0 


ıREM STX 
:REM LDX 
:REM STX 
sREM LDX 
:REM STX 
:REM DEX 
:REM STX $3A 
:REM JMP $8734 
:REM LDA #$12 
:REM LDX #$87 
:REM STA $0302 
:REM STX $0303 
sREM INC $14 
ıREM BNE $OSCD 
:REM INC $15 
ıREM JMP $0345 
:REM JSR 59491 
sREM JSR $9314 
:REM JSR #9DE4 
ıREM LDA $14 
:REM LDY $15 
:REM RTS 


$0303 
#502 
$3C 
#$00 
$3B 


ZEIGER INNERHALB DER CHRGET-ROUTINE 
AUF EINGABEPUFFER SETZEN 


DIREKTMODUS-FLAG SETZEN 


=-> POGRAMMZEILE EINFUEGEN 
BASIC-WARMSTART-VEKTOR WIEDER NORMAL 


AKTUELLE ZEILENNUMMER ERHOEHEN 


NAECHSTES BYTE AUSWERTEN 
--> CHKCEOM 
=--> FRMNUM 
--> GETADR 


wo a EEE N NEE EEE EEE EEE 


RESTORE : P=0 
FOR I =818 TO 989 
READ A$ 
A = DEC(A$) 
P=P+A 
POKE T,A 
NEXT I 


IF P = 18112 THEN 10400 


PRINT"LZO IHNEN IST BEIM ABTIPPEN DER DATAZEILEN " 
PRINT" EIN FEHLER UNTERLAUFEN. UEBERPRUEFEN " 
PRINT" SIE BITTE DIE ENTSPRECHENDEN PROGRAMM- " 
PRINT" ZEILEN !"sEND 

. 

PRINT"LIN DIE DATAWERTE SIND RICHTIG EINGELESEN. " 
PRINT" WENN SIE MIT DISKETTE ARBEITEN,KOENNEN " 
PRINT" SIE DAS PROGRAMM ALS REINES MASCHINEN- " 
PRINT" PROGRAMM ABSPEICHERN (ES BELEGT IN DER " 
PRINT" FORM NUR EINEN BLOCK). FUER KASSETTEN- " 
PRINT" ANWENDER BESTEHT DIESE OPTION NICHT,DA " 
PRINT" DER KASSETTENPUFFER BENDETIGT WIRD! ” 
PRINT" ABSPEICHERN (J/N) ?" 

GETG$: IFG$=""THEN10440 

IFG$<>"J"THEN10485 

SYS43115 "DATAGEN.CODE" 8,1 

POKES8,50: POKES9,33POKE2035, 222 

POKE2036 ,3:POKE2034 ‚38:5Y56549& 

PRINT"(8 GESTARTET WIRD DURCH: " 

PRINT" SYS818,ANFANGSWERT ‚„ENDWERT ‚STARTZEILE" 
END 

® 

REM #*%* PROGRAMMENDE ###* 


AW und EW bedeuten dabei 
Anfangs-bzw. Endwert des 
Speicherbereiches, der in Data- 


zeilen abgelegt werden soll; 
beide Angaben haben dabei in. 


CSompute mib 


dezimaler Form zu erfolgen 
und müssen sich im Bereich 
von 0 bis 65535 bewegen. Bei 
Bereichsunter- oder -überschrei- 
tung erfolgt ein ILLEGAL 


QUANTITY ERROR. SZ gibt 
die Nummer der Basic-Zeile an, 
bei der die Datawerte beginnen 
sollen. Passen nicht alle Data- 
werte in eine Zeile, so wird 
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automatisch in der nächstgrö- 
ßeren Zeile fortgefahren. Even- 
tuell schon vorhandene Basic- 
zeilen gleicher Nummer wer- 
den dabei gelöscht; die anderen 
bleiben unberührt. Bedingt 
durch die Speicherorganisation 
des C16/116 ist die höchst er- 
laubte Zeilennummer 63999. 
Wird SZ ein höherer Wert zu- 
gewiesen oder im Ablauf der 
Routine erreicht, bricht der 
Programmablauf ab und es er- 
folgt ein ILLEGAL QUAN- 
TITY ERROR. 


- Nach dem Ablauf der Routine 
(bei großen Datenmengen 


kann dies einen Moment dau- 
ern - zaubern kann man auch 
mit Maschinensprache nicht) 
stehen die entsprechenden Da- 





tazeilen im Speicher. Alle Ba- 
sicpointer sind richtig einge- 
stellt, so daß die Datazeilen um 
einen Einleseteil ergänzt und 
abgespeichert werden können. 
Es lassen sich also sehr komfor- 
tabel sowohl Basic-Loader für 
Maschinenroutinen als auch 
Datentabellen z. B. für einen 
eigenen Zeichensatz erstellen. 


Das Programm greift auf eine Rei- 
he sehr interessanter Betriebssy- 
stemroutinen des C16/116 zu- 
rück. Ich habe daher in den abge- 
druckten Basic-Loader ein sehr 
ausführlich dokumentiertes As- 
semblerlisting der Routine. inte- 
griert, das für Maschinensprache- 
programmierer sehr interessant 
sein dürfte. 


Waldemar Raaz 


. AUTO-OLD-ROUTINE 


für den Commodore 16/116 


‚Bekanntlich hat 
C16/116 trotz seines komforta- 
blen Basics einige OGNV-Befehle 
(oft gebraucht, nie vorhanden), zu 
denen sicherlich auch der OLD- 
oder RENEW-Befehl, wie er in 
anderen Basic-Versionen genannt 
wird, gehört. Hat man nämlich 
ein Basic-Programm versehent- 
lich mit dem Befehl ”NEW” oder 
durch einen RESET gelöscht, 
kann man es mit dem OLD- 
Befehl wieder herstellen. Dies ist 
möglich, da ein gelöschtes Basic- 
Programm nicht erw& überschrie- 
ben wird, es werden vielmehr nur 
alle Pointer so eingestellt, daß es 
für den Computer den Anschein 
hat, als sei der Basic-Speicher leer. 
Nun gibt es mittlerweile auch für 
den C16/116 schon eine Reihe 
von diversen OLD-Routinen, 
doch hat die vorliegende Routine 
- meiner Meinung nach - gegen- 
über anderen einen entscheiden- 
den Vorteil. Muß man sich bei 
herkömmlichen OLD-Routinen 
immer die Startadresse merken, 
da solch eine Routine zwangsläu- 
fig in Maschinensprache geschrie- 
ben sein muß und folglich durch 
SYS gestartet wird, so ist dies bei 
der abgedruckten Routine nicht 
mehr nötig. Sie ist mit einem Au- 
tostarter versehen, der die Routi- 
ne nach dem Laden (sowohl (!) 
“ von Diskette als auch von Kas- 
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auch der 


sette) automatisch startet. Das 

mehr als lästige Suchen der Start- 

adresse entfällt somit. Gehen Sie 
zum Eingeben der Routine fol- 
gendermaßen vor: 

- geben Sie den abgedruckten 
Basic-Loader ein und speichern 
Sie ihn zur Sicherheit ab. Alle 
REM-Anweisungen und Dop- 
pelpunktzeilen können Sie da- 
bei weglassen; sie’sind für den 
Programmablauf nicht rele- 
vant. 

- Starten 'Sie den Basic-Loader 
mit RUN. 

- Es dauert einen Augenblick, 
bis die DATA-Werte eingele- 
sen sind. Das Programm führt 


beim Einlesen einen zeilen- . 


orientierten Prüfsummen- 
check durch. Das heißt, fehler- 
hafte DATA-Zeilen werden so- 
fort lokalisiert. Das Programm 
gibt Ihnen dann die Nummer 
der Zeile an und stoppt. 

- Geben Sie auf die Frage nach 
dem Speichermedium entspre- 
chend: Ihres Speichers ”D” 
oder ”K” ein. Legen Sie dann 
eine Diskette/Kassette ein und 
drücken die "SPACE”-Taste. 

- Wenn alles in Ordnung ist, 
wird die Routine jetzt automa- 
tisch abgespeichert. Sie ist ex- 
trem kurz, was sich angenehm 
in den Speicher- und Ladezei- 
ten niederschlägt. 


tips & tricks_ 


Haben Sie nun versehentlich ein 
Basic-Programm gelöscht, neh- 
men Sie die generierte Maschinen- 
routine (nicht etwa den Basic- 
Loader) und laden ihn sofort nach 
dem Löschen ein. Sind nach dem 
Löschen Variablen angelegt oder 
Basiczeilen eingegeben worden, 
läßt sich das gelöschte Programm 
nicht mehr regenerieren. Zum 
Laden geben Diskettenanwender 


LOAD”AUTO- 
OLD.CODE’?,8,1 

und Kassettenanwender entspre- 
chend 


LOAD”AUTO- 
OLD.CODE? ‚1,1 


ein. Nach dem Laden startet die 
Routine automatisch und regene- 
riert das gelöschte Basic-Pro- 
gramm. Dabei erscheint sowohl 
nach dem Laden als auch nach 
Ablauf der Routine ein READY. 
auf dem Bildschirm, das ist nor- 
mal. Mit List können Sie sich nun 
überzeugen, ob alles einwandfrei 
geklappt hat. Da für Maschinen- 
programmierer sowohl die ver- 
wendeten Betriebssystemrouti- 
nen als auch die Technik des Au- 
tostartes ‘sehr interessant sein 
dürfte, habe.ich dem Basic-Loader 
ein sehr ausführliches dokumen- 
tiertes Assemblerlisting der Rou- 
tine beigelegt. 





C-16 LISTING + CHECKSUMMEN (OC V1.0) 


oO REM HBRRBBRBHRBEIIE EIER III IE AN IHRER EINER 





RER <171> 
1 REM * 

* <98> 
2 REM * AUTO-OLD ROUTINE FU 
ER DEN COMMODORE 16/11& + <118> 
3 REM # 

* <100> 
4 REM #* BELEGT WIRD DER SPEICHERBEREICH VO 
M 709 BIS 771 * > L12 
5 REM * 

E <102> 
6 REM # DER WARMSTARTVEKTOR (80302/0303) W 
IRD MODIFIZIERT %* <25> 
7 REM * 

* P <104> 
BREM * WRITTEN 1985 BV WALDEMA 
RRAAZ * <228> 
9 REN BREI III HIHI IE RENE 
RR IHHIIAHI HIHI AI HEHE NE <180> 
193 <68> 
a en} <69> 
10000 DATAA2,12,A0,87,8E,02,03,8C, 762 <101> 
10002 DATAO03,03,A9,01,A8,971,2B,20, 564 <81> 
10004 DATA18,88,20,4B,88,20,93,8A, 720 <157> 
10006 DATA4C,03,87,00,00,00,00,D0, 422 <84> 
10008 DATA00,00,00,00,15,00,00,00, 21 <74> 
10010 DATA00,00,00,00,00,71,98,71, 378 <109> 
10012. DATA?4,00,00,00,00,00,00,00, 148 <106> 
10014 DATAO00,00,00,868,86,65,02,00, 467 <231> 
10016 DATAA2,3E,BD,00,30,9D,C5,02, 817 <210> 
10018 DATACA,10,F7,RA2,C5,A0,02,864, 1120 <209> 
10020 DATA26,84,27,A2,08,AO,FF,20, 826 <97> 
10022 DATABA,FF,AI,0D,A2,77,A0,30, 1112 <151> 
10024 DATA2O,BD,FF,AI,26,42,04,A0, 1009 <138> 
100264 DATAO3,20,D8,FF,A2,12,A0,87, 981 <188> 
10028 DATABE,02,03,8C,03,03,60,41, 454 <B6> 
10030 DATASS,54,4F,2D,4F ,„4C,44,2E, 562 <112> 
10032 DATA43,4F,44,45,00,00,00,00, 283 <175> 
10100 : <213> 
10110 = RESTORE <247> 
10120 : FOR T = 12288 TO 12420 STEP 8 <57> 
10130 > P=O0O <105> 
10140 : FOR I=-07T07 <235> 
10150 : READ A$ <104> 
10180 : A = DEC(AF) <127> 
10170 : P=P+A <233> 
10180 : FOKE T+I „ A <51> 
10190 : NEXT I <14> 
10200 ® READ R <61> 
10210 : IF P<> R THEN 10500 <141> 
10220 : NEXT T <777> 
10230 : GOTO 10400 <48> 
10240 =: <98> 
10250 3 <108> 
10300 PRINT"{CLEAR DOHN SPACEFIHNEN{SPACE}IISTISP 
ACEYBEIMISPACEYABTIPPEN{SPACEYDER{SPACEIDATAZEIL 
EN{SPACEY" <238> 


Gompute mib 
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_tips & tricks 


10310 PRINT" {DOHN SPACEIEINTSPACEHFEHLERLSPACEIU 
NTERLAUFEN. {SPACE} IN{SPACEIZEILETRVSON}"PEEK (653) 
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+PEEK (64) #256 











«<233> 


10320 PRINT" {SPACE} ISTISPACEHEINTSPACEIPRUEFSUMM 





ENFEHLER {SPACE} AUFGETAUCHT! {SPACEI" 





<146> 


10530 PRINT" {DOHN SPACEIBITTELSPACE}IUEBEPRUEFENT 


SPACEYSIETSPACEYDIESESPACE}ZEILEISPACEI! "SEND 





10340 3 
10350 3 





<218> 
<198> 
<208> 


10400 PRINT"{CLEAR DOWN SPACEYDIE{SPACEIDATAWERT 
EISPACEISINDISPACEIRICHTIGISPACEFEINGELESEN. {SPA 





"CEI" 











S <227> 


10410 PRINT"{DOHN SPACEIDIELSPACEIAUTD-OLDISPACE 
3ROUTINE{SPACEIWIRDISPACEINUNTSPACEIALSTSPACEIRE 


I-{SPACE}Y" 








<2354> 


10420 PRINT" {DOUHN SPACEYINESTSPACE2IMASCHINENPROG 


RAMM{SPACE2YABGESFEICHERT. {SPACE}" 


<17> 


10430 PRINT"{DOHN SPACE}YARBEITEN{SPACEISIETSPACE 
3MITISPACEZ2 RVSONYD{RVSOFFYIISKISPACE}ODERISPACE2 





RVSONYKERVSOFFIASSETTE?FLSPACEI" 








<16> 





10440 GETKEYB$: IFG$< >"D"ANDG$<>"K" THEN10440 
10450 GA=8: IFG$="K"THENGA=1 


<27> 
<34> 


10450 POKE12372,56A:PRINT"{DOHN SPACE RVYSONIOK!{R 
VSOFF}>" 
10470 PRINT"{DOHN SPACEILEGEN{SPACEYISIETSPACEIJE 
TZT{SPACEIEINEISPACEIDISKETTE/KASSETTEtSPACE}" 
10480 PRINT"{DOHN SPACEYEIN{SPACE}UND{SPACE}DRUE 
CKEN{SPACEYSIETSPACEIDIEASPACE RVSONYISPACE{RVSOF 
EI-TASTETSPACEY!{SPACEYI" 
10490 GETG$: IFG$< >" {SPACE} "THEN10490 
10500 PRINT”{DOHN SPACE RVSONFOK!RVSOEFI":SYS12 
352 5 
10510 PRINT”{CLEAR DOHN SPACEYDIET{SPACEIAUTOOLDT 
SPACEY3ROUTINEISPACEIISTISPACEIABGESPEICHERT! {SPA 
CE>" 
10520 PRINT" {DOHN SPACEFZURTSPACE FANWENDUNG{SPAC 
E2ILAEDTISPACEIMANTSPACEISIE {SPACE} ABSOLUT SPACE 
FILISPACEY" 
10530 PRINT"{DOWN SPACEISIE{SPACEISTARTETISPACE} 
DANN{SPACEIAUTOMATISCHISPACE}!" = END 
10540 : 
10550 REM #*%* PROGRAMMENDE ### 

ENDE DES LISTINGS 









































<40> 
<74> 
<246> 
<129> 
<58> 


<23> 


<78> 


<16> 
<143> 
<137> 





Sehr praktisch: 2 Bildschirme 


DOUBLE SCREEN ist ein Ma- 
schinensprachprogramm, das die 
Verwaltung von zwei Textbild- 
schirmen ermöglicht. 

Das Programm ist in die Basic- 
Zeile O eingelagert und kann so 
sehr einfach geladen, gespeichert 
und in Basic-Programme einge- 


baut werden. 


Beim Listen der Zeile 0 wird auto- 
matisch der Bildschirm gelöscht 
und die Zeile O nicht angezeigt, da 
ein RETURN auf der Zeile die 
Zerstörung des Programmes be- 
deuten würde. Will man das Un- 
terprogramm aufrufen, muß zu- 
erst der Graphic-Speicher einge- 
richtet werden. 

GRAPHIC 1,1: GRAPHIC 0 
oder SYS 50748 

Nähere Informationen über das 
Programm befinden sich im zwei- 
ten Programm, einem: Demo- 
Programm, unter den Punkten 4 
und 5. Es sei hier nur kurz darauf 
hingewiesen, daß das Umschalten 
der Bildschirme durch program 


mieren eines TED-Registers er- 
folgt. Das Demo-Programm zeigt 
drei Möglichkeiten der Anwen- 
dung, die allerdings wenig prakti- 
schen Wert haben und nur zur 
Demonstration dienen. Es sind 
trotzdem erstaunliche Effekte. 
Unter Punkt 4 des Demo-Menüs 
werden die einzelnen Befehle er- 
klärt, die die Unterroutine bietet. 
Unter Punkt 5 sind dann Hinwei- 
se, die sich auf das Maschinen- 
Programm und auf das Arbeiten 
mit dem Prrogramm beziehen. 
Auf der beiliegenden Diskette 
(mit einer 1551 abgespeichert) be- 
finden sich nun zwei Programme: 
1. DOUBLE SCREEN (L) 

ist der DATA-Loader für das 

Maschinen-Programm. 
2. DS-DEMO (ohne 0) 

ist das Demo ohne die Zeile 0. 
Zuerst sollte man den DATA- 
Loader eintippen und ihn aufru- 
fen. Darauf aufbauend kann dann 
das DEMO-Programm eingege- 
ben werden. 


C-16 LISTING + CHECKSUMMEN (ODE Vv1.0) 


100 REM- DOUBLESCREEN 
110 REM- 

120 REM- (C) 1986 

130 REM- BY INSWAR 
140.» 

29073 ; 

160 SYS 50748 

170 : 

180 AD=30000 

190 : : 

200 FOR Z=1 TO 22 
210 : 

220 :5=0 

220 FOR I1=1 TO 8 
240 ::READ H$ 

250 ::POKE AD,DEC (H$) 
260 ::AD=AD+i 

270 ::58=5+DEC (H$) 

280 =NEXT 


<214> 
<87> 
<13> 
<176> 
<198> 
<208> 
<104> 
<228> 
<63> 
<248> 
<149> 
<12> 
<146> 
<26> 
<7> 
<119> 
<107> 
«195? 
<87> 


Compute mib 


290 : 
300 zREAD S5$ 

310 zIF S$=RIGHT$(HEX$(S) ,2) THEN 360 

320 =PRINT "FRUEFSUMMENFEHLER{SPACE}IN{SPACE}YZEI 
LE"3 

350 =PRINT Z#10+570 

340 :END 

Ss50 8 

360 NEXT 

370 : f 

380 C$=CHR$ (13) 

370 D$=CHR$ (17) 

400 E$=CHR$ (27) 

410 Q$=CHRS$ (34) 

420 R$=CHR$ (141) 

A430 L$=CHR$ (157) 

440 : = 

450 K$=ES+"N”" +DE+L$S+ES+"B{SPACEIMONITOR"+C$ 

460 K$=KS+"TISPACEITSZOLSPACEYTEZOLSPACEYAO000"+C 
FH" X"4Cc$ 

4709 K$=K$+"KEYISPACEY1,"+0$+"GRAPHIC"+CH 

480 KS=K$+"CLR"+C$+H"DELETETSPACEI1"+C$ 

490 KS=K$+ES+ "NOKS"+RE 

500 : 

510 KEY 1,K# 

520 POKE 1373,68 

530 FOKE 1374,0 

540 END 
550 2 
San 3: 
570 3 
580 DATA 
570 DATA 
600 DATA 
610 DATA 
620 DATA 
630 DATA 
640 DATA 
650 DATA 
660 DATA 
670 DATA 
680 DATA 
690 DATA 
700 DATA 
710 DATA 
720 DATA 
730 DATA 
740 DATA 
750 .DATA 
760 DATA 
770 DATA 

















00,AD,40,00,00,8F ,1B,4E,ES 
1B,42,1R,54,20,20,22,40,7A 
A1,94,C9,53,D0,F9,20,73,AD 
04, ,42,08,C9,31,F0,06,42,40 
10,C9,32,D0,0E,86,61,20,F0 
73,04 ,AD,14,FF ,29,07,05,6C 
61,D0,05,AD,14,FF,49, 18,57 
AB,8C,14,FF,20,79,04,63,AD 
2C,F0,0A,AO,FF ,C8,8C,03,1C 
40,8C,04,40,60,20,73,04,07 
C9,54,D0,BE,20,73,04,A2,E4 
24,C09,31,F0,0C,69,32,D0,E5 
11,8E,84,40,8E,86,40,F0,A7 
06,8E,81,40,BE,89,40,20,CC 
73,04,49,08,A2,10,A0,FF,79 
C8,84,61,85,62,84,63,86,01 
64,B1,61,AA,B1,63,91,61,26 
8R,91,463,C8,DO,F3,E6,62,51 
E6,63,45,62,C9,10,D0,E9,E3 
A0,B1,A2,91,8C,81,40,8C,5D 
780. DATA 84,40,8E,86,40,8E,89,40,6F 
790 DATA D0,92,1B,4E,00,00,00,00,CB 
ENDE DES LISTINGS 


<93> 
<2543 
<24> 


<165> 
<167> 
<143> 
<153> 
<235> 
<173> 
<213> 
<252> 
<132 

<20> 

<196> 
<255> 
<243> 
<206> 


<28> 
<233> 
<118> 
<106> 
<473 
<190> 
<185> 
<222> 
<158> 
<9B> 
<108> 
<118> 
<53> 
<81>: 
<130> 
<5> 
<148> 
<107> 
<159> 
<213> 
<219> 
<83> 
<67> 
«172> 
<188> 
<134> 
<193> 
<230> 
<105> 
<130> 
<&62> 
<136> 
<32>. 
<131> 
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European Games 


5 neue Sportarten für den C-16 
x Hammerwerfen (siehe Foto) 
* Schwimmen 
* Rudern 
* Gewichtheben 
* Weitsprung DM 19,95 


64k Steckmodul 


wm BIETRRLE MER 
VIEANENERANIHAUNEANERRNEHN 


FKERKKEEKKEFFEREKERFKFEF FF 


‚are proudly to present 


FF FRR 


Diese Spiele sind einfach Spitze 


® 

eo Torpedo Run Cass. 18,95 

® Speedking .Cass. 9,95 

® Superhits Cass. 27,95 
Favourite Four Cass. 26,95 

® Project Nova Cass. 24,95 

® Winter Olympiade Cass. 29,95 

® Kikstart | Cass. 9,95 

.e.es—ssao<a—u.u„—.s—..s.—s.s2,.8e99® 


Ei 















COMMDORE RASIU UA.5 EBETL BYTES FREE 





















































































































































x Neuheiten: 5 am 
. “ .. RE 2 
* _ MountVesuvius Qass. 2895  * Die Supererweiterung für den C-16 * 
Suicide Run Cass. 9,95 
* WinnietheWitch Cass. 995 * * 60671 Bytes free 
* Trailblazer Cass. 25,95 *  .x* Damit ist der C-16 dem 64’er 
* Classics Ill Cass. 33,95 * 2 Ban " 
* Kane Cass. 9,95 * speicherplatzmäßig klar überlegen 
Netrun Cass. 9,95 3 
= Terra Cognita Cass. 9,95 : (22000 Bytes mehr als der 0-64) 
* Ghost’n Ghoblins Cass. 29,95 * * Voll vom Basic her nutzbar 
KK ERREEEEREKEEEEKkE % Wahnsinnsspiele für die ausgebaute Version 
njaju]n]nnjn njnjnnnnnnninjnim mine nm m mm] 
Jump Jet Superspiele für den ausgebauten C-16 7 
; \ : BrE ah DO 
(mindestens 1 6 k Erweiterung nötig) 5 ee daß es in sich hat. D 
a a ick. 20.05 I 
Senkrechtstarter (Flugsimulator) 43 aceisw Fiugsimulator,derdies4kvollausnutztt D 
> 5) Einfach super! Cass. 895 N 
* Start vom Flugzeugträger aus U  Quiwi Das Quizspiel für die ganze Familie. Cass. 2995 U 
* Deutsche Anleitung Ü] Jump Jet Flugsimulator eines Senkrechtstarters Cass. 33,75 
5 A 7 5 nm  Kurvendiskussion e) 
%* Top Grafik mit verschiedenen Perspektiven Eine tolle Hilfe für Schule/Beruf. Minima, Maxima, Nullstellen, = 
N 5 Oo Polstellen, Wendepunkte, Lupenfunktion, Grafik ständig oO 
* Sehr gute Instrumentierung (siehe Foto) 3 abrufbar, etc. Cass. 19,95 Disk. 19,95 = 
»k Sehr realistische Simulation DM 33,75 sonooooooooosoooaosonoagaaooush 
OO000000000000000000000000000 
° Literatur und Zubehör ° Seren ae 
= 2 ö Ein Kampfflugsimulator der Superlative 
o Data Becker: Basic Buch 29,00 © * verschiedene Bewaffnung wählbar 
© Data Becker: Grafikbuch - 29,00 ° ; 
o ar: o * Landkartenanzeige 
o Data Becker: Maschinenspr. 29,00 o * Luft und Schiffsk f 
© Leercassetten C-15 5St. 11,95 o Boden, Luft und Schiffskamp 
9 Leercassetten C-5 5St. 9,95 9 * Betankung in der Luft möglich 
o C-16 Userport 59,95 © > Spitzengrafik, wahnsinnig schnell 
9  Leerdiskeiten 10:8... 19:88, 5 * Gegnerischer Raketenangriff 
0000000000000000000000000000 wird angezeigt 











Unsere Lieferbedingungen 


Softwareangebot sorgen für zufriedene Kunden. 






















































































Einfach spitze: Wir liefern Ihnen die Ware frei Haus - auch nach Österreich, Luxemburg, Beigien, Schweiz, Niederlande (nur der Zoll geht zu Lasten des 
Empfängers)! Sie bezahlen keine zusätzlichen Nebenkosten, Porto oder Nachnahmegebühren. Einen Mindestbesteliwert kennen wir ebenfalls nicht. Durch unseren 
Telefonservice (keinen Anrufbeantworter — sondern einen Ansprechpartner) können Sie problemlos bei uns bestellen. Unser umfangreiches Lager und das riesige 


Spitzenservice + Superqualität — hierfür bürgt der Name Lindenschmidt! 
Versandhandel R. Lindenschmidt - Schulstraße 14 - Postfach 1328 - Telefon (05732) 72849 
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programme 


Doublescreen-Demo 


C-16 LISTING + CHECKSUMMEN (0OC V1.0) 





100 REM- 
110 REM- 
120 REM- 
130 : 
140 SYS 50748 
150 SCNELR 


160 SYS 16444,72,52 


DEMO FROGRAMM 
(C) 1986 
BY INSWABR 


170 PRINT TAB(&) CHR$(27) "T" 

180 : 

190 PRINT "DOUBLESCREEN{SPACE}DEMONSTRATION" 
200: FRINT "=======2==2=22 222222222222" 
210 PRINT 

220 FRINT 

230 FRINT "RBILDSCHIRMFLIMMERN. 2... ..1 
249 PRINT 

250 PRINT "LAUFBAENDER. zerursenun0n «2 
2680 PRINT 

2709 PRINT "ZENTRALBEWEGUNG. 2ausuccn. 3 
280 FRINT , 

290 PRINT "BEFEHLSERLAEUTERUNG. „....4 
300 FRINT 
SLOFERINTCHINWEISE SE SH eanelenen ne ent 
320 PRINT CHR$ (19) CHR$(19) 

330 

540 SYS 16444 ,51 

350 : 

360 GETKEY A$ 

370 IF A$<"1" OR A$>"5" THEN 360 

380 SENCLR 

370 DON VAL (A$)GOSUB 420,570,750,910,1380 
400 GOTO 150 

410 : 

420 REM--BILDSCHIRMFL IMMERN--—--—--- 
A303 

440 CHAR,10,12,"BILDSCHIRMFL IMMERN" 


450 
450 
470 
480 
490 
500 
Ss10 
320 


SYS 16444,12,52 
FOR 1=3072 TO 4090 
CHAR,10,1?2, 
FOR K=1 TO 5 
FOR I=1 TO 10 
SYS 16444,5 
FOR J=1 TO 60 
FOR I=i1 TO 50 
530 SYS 16444,5 
542 FOR J=1 TI0 5 
530 RETURN 

S0 : 

570 REM--LAUFBAENDER-------------- -- 
580 = 

570 SYS 16444,12,52 


:POKE 1,160 NEXT 
"ARVSON}BILDSCHIRMFL IMMERN" 


:NEXT J,I 


:NEXTJ,I,K 











600 FOR I=1 TO 20: FRINT"ESPACE RVSON SPACE RVSO 
FE}"3=2 NEXT 
810 FOR I=1 TO 5: FRINT"{RVSON SPACEI"SPE(SBI"LS 


620 PRINT:NEXT 

630 FÜR I=1 TO 20: PRINT"{SPACE RVSOR SPACE RVSO 
EF3"3=2 NEXT ; 

540 CHAR, 14,5, "LAUFBAENDER" 

650 SYS 16444,T 





660 SENLLR 

670 FOR I=1 TO 20: PRINT"{RVSON SPACE RVSOFE SPA 
CEI"32 NEXT 

&80 PRINT 


670 FOR I=1 TO 5: PRINT 

700 PRINT"{RVSON SPACEI"SPC (38) "(SPACEI": NEXT 
710 FOR I=1 TO 20: PRINT"{RVSON SPACE RVSOFF. SPA 
CEI";3z NEXT 

720. CHAR, 14,5, "LAUFBAENDER" 

730 GOTO 480 





740 3 

750 REM--ZENTRALBEWEGUNG-------- 
760 : 

770 SYS 16444,12,52 


780 FOR I=1 TO 40:H$=H$+" (RVSON SPACEI":NEXT 
790 FOR I=1 TO 10 

800 CHAR,I,I,RIGHT$S(H$,80-I*4) 

810 FOR J=I TO 22-1 

820 CHAR,I,J,"{RVSON SPACEI": NEXT 
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<134> 
<3> 
<166> 
<188> 
<84> 
<126> 
<133> 
<177> 
<2358> 
<10> 
<134> 
<107> 
<117> 
<32> 
<137> 
<183> 
<158> 
<20> 
<178> 
<220> 
<198> 
<62> 
<30> 
<133> 
<136> 
<153> 
<79> 
<B6> 
<101> 
<189> 
<219> 
<213> 
<86> 
<233> 
<92> 
<168> 
<235> 
<139> 
<68> 
<130> 
<111> 
<76> 
<185> 
<142> 
<121> 
<182> 
<108> 
<246> 
<128> 
<53> 


<252> 


<23> 
<1> 


<26> 
<143> 
<14> 
<126> 


<222> 
<67> 

<113> 
<207> 


x6> 
<223> 
<53> 
<32> 
<136> 
<52> 
<234> 
<182> 
<176> 
<ı181> 
<35> 
<252> 











































































































830 CHAR,I,22-1,RIGHT$(H$,80-1*4) <207> 
840 FOR J=I TO 22-I <65> 
850 CHAR,SI-I,J,"TRVSON SPACEI"e NEXT <69> 
860 SYS 16444,T <225> 
870 NEXT <235> 
880 H$="" <75> 
890 GOTO 480 <214> 
900 3: <1935> 
910 REM--BEFEHLSMOEGLICHKEITEN <173> 
920 : <213> 
930 PRINT . <62> 
940 PRINT TAB(9) "BEFEHLSMOEGLICHKEITEN" <203> 
950 PRINT TAB (9) "========- == 2222er mzemm! <55> 
960 PRINT <92> 
970 PRINT TAB(6) CHR$(27) "T" <212> 
980 PRINT SPC (8) "SYS{SPACEY16444,X" <73> 
9790 PRINT <122> 
1000 PRINT "eSPACEIFUERLSPACEFSX< LSPACEIKOENNENt 
SPACE}FOLGENDE" <20> 
1010 PRINT SPETSPEKEREIANDOSTSEAGEFBTEBEN:? . *26> 
1020: FRINT Passen nn ee rear eegen <18> 
1030 PRINT EELSPACE = SBIEDBEHIrOIE SPARE EA 

EN £ <116> 
1040 PRINT "S1=>BILDSCHIRM{SPACE} 1 {SPACEHEINSCHA 

LTEN <69> 
1050 PRINT "S2=>BILDSCHIRMISPACEYZ{SPACEYEINSCHA 

LTEN <101> 
1060 PRINT "T{SPACE}=>BS-INHALTE{SPACEFAUSTAUSCH 

EN <114> 
1070 PRINT "Ti1=>INHALT{SPACEIBSTSPACEYZ{SPACEIIN 
XSPACEYBS{SPACE}Y1 <225> 
1080 PRINT "T2=>INHALTTSPACEIBSTSPACEIASPACEI IN 
SSPACEJBETSFADETZ <2477> 
10907, PRINT => -r = en <89> 
1100 PRINT "ES{SPACE}KOENNENTSPACE}IMEHRERETSPACE 
3KOMMANDOS <100> 
1110 FRINT SPC (3) "HINTEREINANDER {SPACEISTEHEN. <198> 
1120 PRINT "(Z.B.: {SPACEISYS{SPACE}16444,51,T,52 

“..) <220> 
1130 PRINT <7> 
1140 PRINT <17> 
1150 PRINT SPC (5) "WEITER{SPACEIMIT{SPACEI>SPACE<S : <209> 
1150 GOSUB 2130 <204> 
1170 SCNELR <126> 
1180 PRINT SPC (9) "SYSISPACEI16444" <189> 
1190 PRINT <67> 
1200 PRINT "NACH{SPACEFEINEM{SPACE+HRENUMBER-BEFE 

HL <212> 
1210 PRINT 2 LSEAEEIVERBENBERTESFABESSTENIESERTEEN 
UCH{SPACE}DIE <172> 
1220 PRINT SPC (9) "ZEILE{SPACE}O. <65>.: 
12530 PRINT <107> 
1240 PRINT "Z.B.s{SPACE}RENUMBER{SPACE}100,10 21737 
1250 PRINT "{SPACESYZEILEISPACEIOTSPACEIWIRDISPA 

CE} ZUTSPACEY10O <138> 
1260 FRINT <137> 
1270 PRINT "DURCH{SPACEISYSTSPACEI1644AISPACEIWI 
RD{SPACEYZEILE <196> 
1280 PRINT SPC (5) "100{SPACEIWIEDERISPACE}IZUTSPAC 

E30. <148> 
1290 PRINT <168> 
1300 PRINT <178> 
1310 PRINT SPC (4) "INSTSPACEIMENUESPACEIMITTSPAC 

E>>E< <180> 
1320 GET A$: IFA$="E"THEN1340 <238> 
1330 GOTO 1320 <115> 
1340 PRINTCHR$ (19) CHR$ (19 <30> 
1350 RETURN $217> 
1360 GDTO1IS60 <161> 
1370 2 <1535> 
LIBRI REN HEINWIETBE ne nen sehen <172> 
1390 z <173> 
1400 PRINT "HINWEISE: <aa> 
1410 PRINT "========= <1035> 
1420 PRINT <A2> 
1430 PRINT CHR$ (27) "T"; : <25> 
1440 PRINT "NACH{SPACEIDEM{SPACEIDER{SPACEIPROGR 
AMMLADER{SPACE}VON <123> 
1450 PRINT "DOUBLESTREEN{SPACEIABGELAUFEN{SPACE} 

IST, <a2> 
1460 PRINT "BEFINDET{SPACEISICHTSPACEIDOUBLESCRE 
EN{SPACE} INTSPACEYZEILE{SPACE}O. <225> 
1470 PRINT <92> 
1480 PRINT "BEIM{SPACE}YLISTEN{SPACEYWIRDISPACEIN 
UN{SPACE}YDER{TSPACEYBILDSCHIRM <237> 


1490 PRINT "GELDESCHT SPACEIUND{SPACEIZEILEISPAC 








Compute mit — Sonderheft — 1/87 


EIOLSPACEINICHTSPACEIANGEZEIGT. 

















































































































<112> 
1500 PRINT <122> 
1510 PRINT "ZEILEISPACEIOLSPACEIDARFTSPACEIVONTS 
PACEFINUN{SPACEIANLSPACEINICHT {SPACEIMEHR <190> 
1520 PRINT "BENUTZT{SPACE}WERDEN, {SPACEIDATSPACE 
3SONST.SPACEIDDUBLESCREEN <76> 
1530 PRINT "VERLOREN{SPACEIGEHT! <167> 
1540 PRINT <163> 
1550 PRINT "NACH{SPACEFEINEM{SPACEFRENUMBERTSPAC 
EIMUSS{SPACEISOFORT{SPACEISYS <184> 
1560 PRINT "AUFGERUFEN{SPACE}WERDEN{SPACE} (SIEHE 
tSPACE}I>4<) <160> 
1570 PRINT <193> 
1580 PRINT "DAS{SPACE}PROGRAMM{SPACEILAEUFTLSPAC 

EINUR, {SPACEIWENN{SPACEIGRAPHIC <210> 
1590 PRINT "EINBESCHALTET{SPACEY IST! <178> 
1600 PRINT ‘ <223> 
1610 PRINT "SPEICHERT{SPACEIMANTSPACEFEINTSPACEI 
PROGRAMM{SPACEIAB, {SPACE} IN{SPACE}DEM <90> 
1620 PRINT "DOUBLESCREEN(SPACEIALSTSPACEIZEILEIS 
PACEIO{SPACE}VORHANDEN{SPACE} IST, <40> 
1630 PRINT "SO{SPACEIWIRD{SPACEYZEILELSPACEIOTSP 
ACE}MITISPACEIABGESPEICHERT! <178> 
1640 PRINT : <7> 
1650 PRINT "WEITER{SPACEIMIT{SPACE}Y >SPACE<"; <14> 
1660 PRINT "tHPF"CHRS (27) "KILEFETY"SCHR$S(27I"B"3 <128> 
1670 GOSUB 2130 <204> 
1680 SCNELR <126> 
16890 PRINT "WENN{SPACE}BILDSCHIRM{SPACEI2LSPACEI 
EINGESCHALTET{SPACE}YIST, <183> 
1700 PRINT "ERFOLGEN{SPACE}PRINT-ANWEISUNGEN{SPA 
CEITROTZDEM{SPACEFIAUFTSPACEFBILDSCHIRM{SPACEI LS 

PACE}Y! <130> 
1710 PRINT <77> 
1720 PRINT "SOBALD{SPACEIEIN{SPACEFERRORTSPACEIA 
UFTRITT{SPACEIWIRD <81> 
1730 PRINT "AUTOMATISCH{SPACE}BILDSCHIRMISPACEI 
{SPACEFEINGESCHALTET. <101> 
1740 PRINT <107> 
1750 PRINT "DER{SPACEICURSORTSPACEFERSCHEINTISPA 
CEIUNABHAENGIG{SPACE}VOM <248> 
1760 FRINT "EINGESCHALTETEN{SPACEIBILDSCHIRM. <192> 
1770 PRINT <137> 
1780 PRINT "WENN{SPACE}IGRAPHIC{SPACEFEINGESCHALT 
ET{SPACE}YIST, <30> 
1790 PRINT "ENTSTEHT {SPACEIEINTSPACEIFUERTSPACE}I 
BASIC{SPACE}UNBENUTZBARES <148> 
1800 PRINT "LOCH{SPACE}IM{SPACEIRAM. : <39> 
1810 PRINT "IN{SPACEIDIESEM{SPACEILOCHTSPACEIRIC 
HTET{SPACE}DOUBLESCREEN{SPACEIDEN <69> 
1820 PRINT "2. {SPACEIBILDSCHIRM{SPACEIEIN. <137> 
1830 PRINT <19B> 


programme 


1840 PRINT "DIESER{SPACE}BEREICHISPACE}YIST{SPACE 






















































































3VONTSPACEFNUNTSPACEIANTSPACEINICHT <1> 
1850 PRINT "MEHR{SPACEIFUERTSPACEIMASCHIENENPROG 

RAMME {SPACE} ZU <193> 
1860 PRINT "GEBRAUCHEN! <45> 
1870 G0SUB 2130 <149> 
1880 SCNELR <71> 
1890 PRINT "DOUBLESCREEN{SPACEYISTISPACEINUR{SPA 
CEILAUFFAEHIG, <118> 
1900 PRINT "WENN{SPACE}DER{SPACEIBASIT-RAMISPACE 
3BEREICHTSPACEYBEITSPACEISA400O <180> 
1910 PRINT "BEGINNT. <159> 
1920 PRINT <32> 
1930 PRINT "SETZT{SPACEIMAN{SPACEYIDENTSPACEIBASI 
C-ANFANGTSPACE HOCH, {SPACE}YSD <199> 
1940 PRINT "MUSS{SPACEIDAS{SPACEHPFROGRAMMISPACE} 
ANGEPASST{SPACE}IWERDEN. <215> 
1950 PRINT "EINE {SPACE}VERAENDERUNGTSPACEIDER{SP 
ACEISYS{SPACE}ADRESSE - <225> 
1960 PRINT "REICHT{SPACEINICHT! <207> 
1770 PRINT : <B2> 
1780 PRINT "DOUBLESCREEN{SPACE}BENUTZT{SPACE}DEN 
XSPACEYIFACTSPACEYIALS <173> 
1790 PRINT "ZWISCHENSPEICHER. <1> 
2000 PRINT <112> 
2010 PRINT "ES{SPACEIISTISPACEINURTSPACEILAUFFAE 

HIG, {SPACEIWENN{SPACE}IDIE <186> 
2020 PRINT "ROM-BANK{SPACEFEINGESCHALTET{SPACE}YT 

ST. <246> 
2030 PRINT <142> 
2040 PRINT "DIE{SPACE}DEMO-PROGRAMMEISPACE}IZEIGE 
N{SPACE}INUR{SPACEYEINIGE <208> 
2050 PRINT "EFFEKTE. <176> 
2060 PRINT "SINNVOLLERE{SPACE3ANWENDUNGEN{SPACEI 
INNERHALB{SPACE}YVON <218> 
2070 PRINT "DATENVERARBEITUNGSPROGRAMMEN{SPACEIE f 
TC. <169> 
2080 PRINT "BIETENtTSPACEISICHTSPACEINATUERLICHTS 
PACEIAN!"5 <242> 
2090 GOSUR 2130 <114> 
2100 PRINT CHR$(1PICHR$ (19) <25> 
2110 RETURN <212> 
2120 : <138> 
2130 GETKEY A$ <64> 
2140 IF A$<>"{SPACEI" THEN 2130 <156> 
2150 RETURN <252> 


ENDE DES LISTINGS 











2 x Laufschrift für Ihre Programme 





Damit die Schriftzeilen in Ihren 
Programmen endlich Laufen ler- 
nen, hat uns Karsten Aprath das 
folgende kleine Programm ge- 
schrieben. Das Besondere an die- 
sem Programm, ist die Tatsache, 
daß es vollständig mit unserem 


Genesis-Super-Assembler 
wickelt wurde, 


ent- 
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Es läßt sich in jedes Programm 
einfügen, sofern dieses nicht den 
Speicherbereich 16120 - 16383 
(3EF8 - 3FFF) überschreibt. Wei- 
terhin wurde alles in diesem Be- 
reich abgelegt und damit die Be- 
reiche 1630 - 1771, usw. ver- 
schont. 


Mit SYS 16120 wird das Pro- 
gramm aufgerufen. Man befindet 
sich nun in einer INPUT- 
Routine. Alle Editierfunktionen 
verhalten sich, wie Sie es bei ei- 
nem Inputbefehl gewöhnt sind. 


Nun können Sie den Text einge- 
ben, der im Laufschriftmodus an- 
gezeigt werden soll. Obwohl man 
mehr al 40 Zeichen eingeben 
kann, liest das Programm nur die 


“ersten 40 Zeichen und legt sie in 


16303 - 16342 ab. Nach dem RE- 
TURN meldet sich der Cursor 
zurück. 


Die Laufschrift selbst wird mit 
SYS 16182,x gestartet. Das x (0 - 
255) steht für die Geschwindig- 
keit der Laufschrift und wird in 
SKpeicherstelle 16261 (3F85) ge- 
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schrieben. Durch direkte Poken 
in diese Speicherstelle läßt sich die 
Geschwindigkeit jederzeit wäh- 
rend des Betriebes ändern. Das 
Ausschalten der Laufschrift ist je- 
derzeit mit SYS 16169 möglich. 
Die Farbe der Zeichen läßt sich 
mit 

POKE 16247,x 

ändern.Für ”x” steht hier 0 - 127 
(normal) und 128 - 255 (blin- 
kend). 

Die Sterne (als Leerzeichen) kann 


man mit 
POKE 16141,x 


31 


programme 


ter Neustart nötig, um die Zei- 
chen in den vorgesehenen Spei- 
cherbereich zu schreiben. 


xxx 


ändern. Für ”x” setzen sie bitte 
den entsprechenden Wert aus der 
Poketabelle des Handbuches ein. 
Es ist danach allerdings en absolu- 








C-1& LISTING + CHECKSUMMEN (OC V1.0) 


ein Editor, mit dem man einen 
beliebigen Text eingeben kann. 


8mal Vergrößerung auf dem 
C16 













































































10. REM============================2 222 - <122> | Dieses Programm vergrößert ei- Dieser Text wird dann, wenn 
20 REM= : = <212> | nen beliebigen Text 8mal und man das Ganze mit SYS 14580 
2 Be Ay ee = re läßt diesen vom rechten in den startet, 8mal vergrößert ausge- 
50 REM= SCHOPENHAUERSTRASSE 25 = <98> | linken Bildschirmrand scrollen. geben. 
60 REM= = <252> | Zuerst muß der erste Teil geladen Diese und einige andere Informa- 
2 Seesen Pk und gestartet werden, dann der ° tionen finden sie auch in den 
& ’ ° x ‚92: rm 
90 FORT=010139sREADAS= A=DEC (A$) sB=B+As POKE161204+ zweite Teil. Der zweite Teil st REM-Zeilen des 1. Programmes. 
T,A:NEXT <132> 
100 IFB<>16492THENPRINT" {CLEARIFEHLERTSPACEF INS 
PACE+DATA,STSPACEIS10-480": END <107> C-16 LISTINGS + CHECKSUMMEN (OC V1.0) 
110 FORT=16263T016383: POKET ‚42: NEXT <247> 
120 A=0:B=0: FORT=0T039: READA$: A=DET (A$) :B=B+A:PO 10 REM it RE ÄHEENE <121> 
KE1ISSOS+T ,A:NEXT <130> | 20 REM »** MEÜDEMAKER FUER DAS PRO- xxx <59> 
130 IFB< >2631 THENPRINT" {CLEARIFEHLERTSPACEI IN{SP 30 REM #** GRANM 8 * VERGRUESSERUNG x## <69> 
ACE}DATA,S{SPACEI520-560":END £ <72> | 40 REM *** (C) RY TRONIC- VERLAB ar <227> 
140 SYS16182,10:PRINT"{CLEAR DOHN2 RIGHT SS3TART 50 REM *** WRITTEN AND CREATED BY  #x* <148> 
{SPACE SSIATZEINGABESPACE3DURCHISPACE SS SY SS} 60 REM #+ HARTMUT OTT ax <36> 
16120" <101> | 7OREM*** TIGER - SOFT <177> 
150 PRINT"{DQHN RIGHT SS}TART{SPACE SLIAUFSCHRIF 80 REM ##% u* <77> 
TISPACE}DURCHTSPACE SS SY SS}16182,X" <145> | 90 REM #** DIESES FROGRAMM VERGROE- % <156> 
160 PRINT"{DOUN RIGHT+X{SPACEISTEHTLSPACEFFUERTS 100 REM ** SERT DIE SCHRIFT 8 MAL  xx% <9B> 
PACE>YDIE{SPACE SGHESCHWINDIGKEIT" <184> | 110 REM ** UND LAESST DIESE VOM a. <140> 
170 PRINT"{DOHN RIGHT SAFUSSCHALTEN{SPACE}DURCHE 120 REM #%* RECHTEN IN DEN LINKEN Pe <118> 
SPACE SS SY SS}16169" <66> | 130 REM #* BILDSCHIRMRAND SCROLLEN. ###* <234> 
180 PRINT"{DOHN RIGHT SSICHRIFTFARBE{SPACE}DURCH 140 REM ** DER TEXT DES SCHRIFTZUGESK«* <176> 
{SPACE SP}OKE16247 „X{SPACE?AENDERN" <154> | 150 REM *#* KANN IM NACHFOLGENDEN .r <11> 
190 PRINT"{DOHN RIGHTYX=0-127XSPACE SN3ORMAL{SPA 160 REM ** EDITOR ERZEUGT WERDEN .. x#* <153> 
CE3}X=128-255{SPACE SBILINKEND <153> | 170 REM ** TIPPEN SIE NUN DIESES ax <42> 
200 FRINT"{DOHN RIGHT SGYESCHWINDIGKEIT{SPACEIDU 180 REM ** PROGRAMM SELBSTVERSTAEND-x#* <135> 
REH{SPACE SP}OKE16261 ,1-255" <132> | 190 REM ** LICH OHNE REM - ZEILEN  #**  <146> 
210 PRINT"{DOHN RIGHT SDIURCH{SPACE SP}OKE16141, 200 REM ** AB UND SFEICHERN SIE ES x#x <213 
X{SPACE>KOENNENSPACEIFUER{SPACEIDIE" <168> | 210 REM ** IM MONITOR MIT : “x <164> 
220 PRINT"<DOHN RIGHT SS}TERNE£SPACEIANDERELSPAC 220 REM ** 5 "S#VERGR. ",1,3800,3988 x**% <180> 
E SZYEICHEN{SPACEIGEPOKT {SPACE}WERDEN. " <190> | 230 REM ** AR . LADEN KOENNEN SIE ES#*#* <60> 
230 FRINT" {DOWN RIGHT. SDIAS{SPACE SPIROGRAMMISPA 240 REM ** WIEDER !!AUSSERHALB!! DES#** <54> 
CEIMUSS{SPACEIDANN{SPACEIMITISPACE SS SY SS}1612 250 REM ** MONITORS MIT LOAD "" 1,1 xx%* <215> 
a" <135> | 260 REM #* (NACH DEM LOADEN NEW EIN-### '<131> 
240 PRINT"{DOHN RIGHTINEUCSPACEIGESTARTET{SPACE} 270 REM ** GEBEN). DANN TIPPEN SIE x## <108> 
WERDEN" <182> | 280 REM ** DEN EDITOR AB UND SPEI- xxx <237> 
250 DO:FORT=010255:POKE16247,T <237> | 290 REM ** CHERN DIESEN EBENFALLS. ##%* <249> 
260 FORA=1T0200:GETA$: IFA$=""THENNEXTA:ELSESYS1& 300 REM ** NÜN KOENNEN SIE DEN EDI- *** <173> 
189: POKE16247 „0:SCNELR=SEND <132> | 310 REM ** TOR MIT RUN STARTEN UND #%*#* <225> 
270 NEXTT:LOOP <151> | 320 REM ** IHREN GEWUENSCHTEN TEXT ##x%* <118> 
280 <137> | SI0 REM ** EINGEBEN (NOCH UEBER 1KR *#** <127> 
290 <127> | 340 REM ** SPEICHERFLATZ). DEN TEXT ##*%* <177> 
300 S=a=2=====222=02000: <157> | 350 REM ** UND DAS MEODEPROGRANM #r* <200> 
310 DATA20,29,3F,A9,8E,20,D2,FF <S6>. | 360 REM ** KOENNEN SIE ZUSAMMEN- IM ##%* <122> 
320 DATAA9,08,20,D2,FF,A9,00,8D <178> | 370 REM ** MUNITOR NIT = Pr <12> 
3350 DATAB4,3F,A2,78,49,24,9D,897 <233> | S80 REM *#* S "Bx#VERGR.”",1,3800,3E80 #*# <165> 
340 DATASF „CA,DO,FA,8D,87,3F,A2 <74> 390 REM ** ABSAVEN UND JE NACH BE- xx <176> 
350 DATA00,20,CF,FF,C7,0D,F0,08 <89> | 400 REM **. DARF WIEDER WIE OBEN LA- #*#%* <B> 
360 DATA9D,AF,3F,E8B,E0,28,DO,Fi <86> | 410 REM ** DEN. GEFALLEN IHNEN DIE x%% <209> 
370 DATA60,78,A9,CE,A2,0E,8D,15 <248> | 420 REM ** FARBEN DES PROGRAMMS “.. <3> 
280 DATAO3,8E,14,03,58,60,20,D8 <123> | 430 REM ** NICHT SO KOENNEN SIE DIE *** <162> 
390 DATA9D,BE,85,3F,8E,86,3F,A9 <64> | 440 REM ** SE DURCH FOLGENDE POKES #** <22> 
400 DATAOE,20,D2,FF,78,47,51,A2 <122> | A450 REM ** AENDERN : Pe <43> 
410 DATASF,8D,14,03,8E,15,03,58 <130> | 460 REM ** FOKE14617,ZEICHENFARBE xx# <43> 
420 DATA&0,CE,86,3F ,D0,15,AD,85 <255> | 470 REM ** POKE14646,HINTERGRUNDF. #** <251> 
430 DATASF ,8D,86,3F,EE,84,3F ,AE <23> | 480 REM ** POKE14651 „‚RAHMENFARBE *** <144> 
440 DATAB4,3F ,E0,51,D0,08,A9,00 <51> | 450 REN ** FOKE14467 „SCHNELLIGKEIT #** <166> 
450 DATABD,84,3F,4C,0E,CE,A0,00 <176> | 500 REM ** DES SCROLLINGS .. WERTE : #x# <53> 
460 DATABD,87,3F,997,00,0C,A9,00 <186> | 510 REM #* (1=SEHR SCHNELL — 255= xx* <111> 
470 DATA99,00,08,E8,C8,C0,28,DO <27> | 520 REM ** SEHR LANGSAM) “r% <236> 
480 DATAEF ,AC,OE,CE <252> | 530 REM ** UND NUN VIEL SPASS .. <129> 
490 REM======2==-==-=2=2 22-2 === === mem oncecenoene <A> 540 REM KRRRERRUNKERRRIRHH NN H HR . <35> 
500 REM DATAS FUER DEMO <236> | 60000 DAIA00,00,00,00,00,49,0D,85, 315 <121> 
<24> | 60001 DATAFE,A9,68,85,FD,A0,01,Bi, 1251 <165> 
520 DATA20,40,41,55,46,53,43,48 <31> | 60002 DATAFD,38,91,FD,C8,C8,C0,28, 1419 <184> 
530 DATA52,49,46,54,44,45,4D,AF <196>.| 60003 DATADO,FS,AS,FD,18,69,28,70, 1184 <97> 
540 DATA20,28,43,29,20,42,59,20 <19> | 60004 DATAO2,E&,FE,85,FD,C9,A8,DO, 1449 <253> 
550 DATA20,4B,41,52,53,54,45,4E <104> | 60005 DATAE4,AS,FE,CI,OE,DO,DE,AD, 1465 <179> 
560 DATA20,41,50,52,41,54,48,20 <248> | 60006 DATA00,38,85,FD,AD,01,38,85, 805 <29> 
ENDE DES LISTINGS 60007 DATAFE,AO,00,8C,04,38,B1,FD, 1044 <180> 
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Keine Preisfrage, kein Rätsel, kein Puzzle wollen wir diesmal mit Ihnen veranstalten. Sondern wir 
wollen von Ihnen einige Fragen über Ihren Computer beantwortet wissen. Sie helfen uns damit bei 
der Planung für die zukünftigen Hefte und können dann vielleicht »Compute mit«-Hefte in der Hand 


halten, die noch mehr Ihr Gefallen finden. 
Außerdem honorieren wir 50 Einsender, die wir auslosen werden, mit tollen Preisen! 








1. Preis 11. bis 20. Preis 

Eine Plus 4/Floppy Programmpaket aus dem 
1551-Kombination aktuellen Softwaremarkt 

2. bis 10. Preis 21. bis 50. Preis 

Ein Joystick für C 16/116/plus 4 Programmpaket Ihrer Wahl aus 
(gestiftet von T.S. Datensysteme) unserem Softwareservice (Seite 34) 


1. Ich besitze einen Computer vom Typ 5. Ich interessiere mich hauptsächlich für 
[| Spiele = Anwenderprogramme 


L] Tips & Tricks _ [_] Kurse 
2. Ich besitze diesen Computer seit (Monat/Jahr) 


6. Längere Programme aus den Heften 
® tippe ich selbst ab 
3. Ich lese die monatliche Zeitschrift »Compute mit« U] lasse abtippen 


[_] im Abo [_] gelegentlich [_] besorge mir von Freunden 
[| regelmäßig [|] nie [_] bestelle ich beim Software-Service 


[_] die Monatszeitschrift »Compute mit« kenne ich 7. Sollte ich einmal einen neuen Computer erwerben, - 
noch nicht. wird es ein 


4. »Compute mit« und »Compute mit-Sonderheft«... 
[1 erwerbe ich selbst [| lese bei Freunden mit sein! 


Wir versichern, daß Ihre Daten nicht mit Namen erfaßt werden. Auch eine Weitergabe an Dritte ist ausgeschlossen. 
Ausschneiden und abschicken an: Absender: 
Tronic-Verlag Name: 


Postfach 870 Straße: 
3440 Eschwege Stadt: 
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_software-service _ 


software-service 


Alle Programme dieses Heftes 
können Sie als Programmpaket auf 
Diskette oder Kassette erwerben. 


Sonderheft 1/87 


Bestell-Nr. CSOK-1/2 Kassette 35,- DM 
Bestell-Nr. CSOD-1/2 Diskette 35,- DM 













Auch die Programmpakete für die | 
Sonderhefte 1, 2 + 3 sind noch zu haben! 


Sonderheft 1/86: (Heft 6,50 DM) 
Bestell-Nr. CSOK-1 Kassette 30,- DM 
Bestell-Nr. CSOD-1 Diskette 30,- DM 
Sonderheft 2/86: (Heft 6,50 DM) 
Bestell-Nr. CSOK-2 Kassette 30,- DM 
Bestell-Nr. CSOD-2 Diskette 30,- DM 
Sonderheft 3/86: (Heft 6,50 DM) 
Bestell-Nr. CSOK-3 Kassette 30,- DM 
Bestell-Nr. CSOD-3 Diskette 30,- DM 




















Bestellungen richten Sie bitte an: 
Tronic-Verlag - Postfach 870 - 3440 Eschwege 
oder telefonisch: (05651) 300 11 

Der Versand erfolgt per Nachnahme 

oder Vorkasse (Scheck, Bar) 


Eine Bitte: Der Softwareversand ist ein Leserservice des Tronic-Verlags. 
Alle Anleitungen sind daher dem entsprechenden Heft zu entnehmen. 
Wollen Sie ältere Software, bestellen Sie bitte das Heft mit. Sollte es 
ausverkauft sein, kopiert unser Versand gegen einen Unkostenbeitrag 
in Höhe des Heftpreises alle Anleitungen für Sie. Vermerken Sie bitte 
auf Ihrer Bestellung »+ Heft«! 
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T-S. Datensysteme-VertriebsgesellschaftmbH 


er 


& 
®) 
m 
= 
N 
> 
S 
[N 
u. 
x 
[>22 


AIR COM: 


Kikstart 9,90 


Project Nova 24,90 Frank Bruno’s Boxing 19,90 


‚Air Wolf 
Atlantis 
Bandits at zero 
Beach-Head 
Big Mac 
Bomb Jack 
Bongo 
Bridgehead 
Cave Fighter 
Classics Il, 4-Games 
Classics I. Cass. mit 4 Prog. 
Commando 
Computer Hits-3, 10-Gämes 
Cruncher 
Death Race 16 
European Games 
„Fingers Malone 
S H S Five Star, 5-Games 
\ SEN Flight Path 737 
x Formula 1 
a \ \ \ = is Galaxians 
SS $ x h y 3 ‚Ghost Town 
2 - : > Grand Master Chess h 
Wimbledon 29,90 Star Events 25,90 Greatest Hits, Cass. mit 4 Prog. 


Gultwing Falcon 
Gunslinger 
Hektik 


Powerball 

Reach for the Sky 
Robin to the Rescue 
Skyhawk 

Slipery Sid 

Snooker 

Speed King 

Se Olympics 


- 


= 
Boos» 


ET ILITITTITH 


Intemational Karate 
Invasion 2000 AD 
Jet Set Willy, 
Jetprix 

King Size Daten Bank 
King Size Turbotext 
Killapede 

King Size 50 Games 
Knock Out 

Kung Fu Kid 

Lawn Tennis 

Leapin Louie 
Legionnaire 

Manic Miner 

Mr. Puniverse 

One Man Droid 


wo8 


Pr 


NoBEEoBEER 


az 

The Return of Rockman 
The Wizard&the Princess 
Tomp of Tarrabash 
Trailblazer 

World Cup Camival 
Winie Witch's 
Superbroom 

World Series Baseball 
Competition Pro 3000 
Joystick 

Competition Pro 5000 
‚Joystick 

Medalist mit Autofeuer 
Quickshot I Joystick 
Speed King Joystick 


ses sase8us 


BI 
2808 


SERNoNFENBBBEREN 


SEENS 
„NIE 
44-2344 77 
BE 33 





28 © 
x 
F2 
8 


BooRNN® 


Be 


Bons 
8888 


Fr 


Denisstraße 45, 8500 Nürnberg 80, Tel. 0911/288286 





programme 


60008 
60009 
60010 
80011 
60012 
60013 
60014 
60015 
60016 
60017 
60018 
60019 
60020 
60021 
60022 
60023 
60024 
60025 
60026 
60027 
60028 
60029 
60030 
60031 
60032 
60033 
60034 
60035 
&0036 
60037 
"560038 
60039 
60040 
60041 
60042 
60043 
60044 
60045 
60046 
60047 
60048 
60049 
60050 
60051 
sNEXTI 
60052 READR: IFP< >RTHENPRINT "PRUEFSUMMENFEHLER{SP 
ACE+IN{SPACEIZEILE"PEEK (63) +PEEK (64) #256: END 
60053 NEXT=SPRINT"DATAS{SPACEISIND{SPACEIRICHTIGE 
SPACEY!! ı" 

ENDE DES LISTINGS 


232 
709 
9497 
1055 
707 
593 
1037 
825 
803 
838 
803 
851 
11909 
793 
827 
938 
824 
9738 
660 
807 
736 
8353 
981 
3 719 
8 937 
.A97,20,91, 892 
{) 1352 
1234 
1314 
1698 
1346 
1141 
791 
1341 
1045 
650 
954 
1136 
588 


DATAOA,2E,04,38,0A,2E,04,38, 
DATAOA,2E,04,38,ER,85,FD,AD, 
DATAO4,38,18,69,D0,85,FE,AS5, 
DATAFE,C9,D4,70,05,02,01,4C, 
DATATE,39,A2,00,8E,02,38,A2, 
DATA00,AO,00,AD,02,38,C9,01, 
DATAFO,17,B1,FD,2D,03,38,FO, 
DATAOB,AF,66,9D,8F,0D,4C,9D, 
DATA38,A9,20,9D,8F,OD,4C,9D, 
DATASB,B1,FD,2D,03,38,F0,08, 
DATAA9,20,9D,8F,0D,4C,9D,38, 
DATAA9,66,9D,8F ,0D,8A,18,69, 
DATA28,AA,CB,C0,07,D0,C4,Bi, 
DATAFD,2D,03,38,F0,15,AD,02, 
DATA38,F0,08,49,20,8D,A7,0E, 
DATAAC ,DS,38,A9,66,8D,A7,0E, 
DATAAC,D5,38,AD,02,38,F0,08, 
DATAA9 „66,80,A7,0E,4C,D5,38, 
DATAA9 ,20,80,A7,0E,4E,03,38, 
DATAAD,03,38,F0,01,60,EE,00, 
DATA38,D0,03,EE,01,38,AD,01, 
DATA38,C9, »„02,A9,3A,4C, 
DATAS7,39, 
DATA3B,A9 
DATA2D,03,38, 
DATAO0,85,FD, 
DATAFD,AS,FE 
DATAA9, 77,91 
DATAO4,85,FE 
DATAFE ,AS,FD, 
DATAFE,C9,OF, 
DATA1S,FF,A9, 
DATAOS,38,A2, 
DATAFD,EB,EO, 
DATA3B,85,FD, 
DATAO1,38,A9, 
DATAAD,01,38, 
DATAFD,C9,60, 
DATAO1,38,A9,00,8D,00,38,A5, 
DATAC6,C9,40,F0,02,60,A5,FE, 1412 
DATA38,E9,04,85,FE,40,64,38, 912 
DATA00,00,00,00,00,00,00,00, © 

FORT= 14336 TO 14728 STEPB:P=0 
FORI=0T07:READA$: A=DEC (A$) =P=P+AsPOKET+I,A 


Sr 
EA 
„00, 
38 


ZRBARSNERNIHRZENET 


‚ao 
DO,F& 
,60,39 
‚8D,03,38,60, 

FE,AO 

OA,AF 

8D 

c2 


je] 





C-16 LISTINGS + CHECKSUMMEN (0OC v1.0) 
10 REN ERBE HRS III HAARE 
20 REM ***SCHRIFT-VERGROESSERER #u800% 
30 REM ### II. TEIL KERRRH 
AO REM xx# RERERE 
50 REM ###* EDITOR RER 
60 REM ###* KERERR 
70 REM #*#* BY HARTMUT OTT EEE 
80 REM ##** TIGER - SOFT “Run 
70 REN RHEIN AH IHHÄES ENG 


monatlich 





<s> 
<b> 
<252> 
<143> 
<9> 
<245> 
<214> 
<154> 
<221> 
<79> 
<233> 
<B2> 
<109> 
<76> 
<179> 
<230> 
<162> 
<118> 
<204> 
<48> 
<26> 
<146> 
<119> 
<B6> 
<192> 
<64> 
<105> 
<156> 
<187> 
<177> 
<a7> 
<59> 
<160> 
<85> 
<97> 
<238> 
<152> 
<197> 
<239> 
<132> 
<169> 
<206> 
<185> 


<237> 


<123> 


<121> 
<123> 
<253> 
<147> 
<16> 
<167> 
<24> 
<21> 
<201> 


100 COLORO,9,4:COLOR4,1,1 
110 POKE65299 , 208: POKE1351,128 
120 PRINT"{CLEAR BLACK RIGHT3 DOWN2>DIES{SPACEYI 
ST{ISPACE}YDERTSPACEYEDITOR{SPACE}ZUM{SPACE}VORHER 
—_" 
130 PRINT" {RIGHT3 DOHNYGEHENDEN{TSPACE}IM. PROGRAMM 
<SPACE} . {SPACEITIPPEN{SPACEISIE" 
140 PRINT"<{RIGHT3 DOHNYNUN{SPACE}IHREN{SPACEIGEW 
UENSCHTEN{SPACEYTEXTISPACEIEIN." 
150 PRINT" {RIGHT3 DOUHNFACHTUNG: {SPACE} BENUETZENT 
SPACEISIETSPACEINICHT {SPACEIDIE" 
160 PRINT" {RIGHT3 DOWN>TASTEN(SPACEIEST, ELRISPAC 
EIHOME{SPACEFRETURN" 
170 PRINT" {RIGHTZ DOHN>FI-FT{SPACEIUNDTSPACEIETR 
L{SPACE}AUSSER{SPACE}I IN{SPACE}IVER-" 
180 PRINT" {RIGHT3Z DOHNYBINDUNG{SPACEIMIT{SPACEIR 
VSON{SPACEIUND{SPACEIRVSOFF" 
170 PRINT" {RIGHTS DO, DOHN2 FTISPACEIATSPACEISCSPACEI 
TISPACEYEXSPACE2}YDRUECKEN" 
200 POKE239,0 
2109 IFPEEK (198) =644THEN210 
220 POKE2397,0 
230 SP=14848:RE=9 
240 SCNELR 
250 PRINT"CHOHE WHHITE RIGHTS DOHN3>SPEICHERSTELL 
EISPACE}: TSPACEI"3SP 
260 PRINT" {HOME RIGHT6 DOWNSYHDECHSTETSPACEISPEI 
CHERSTELLE {SPACE} 15000" 
270 PRINT" {HOHE RIGHTS DOWNS}IMITISPACEISHIFT+SPA 
CEISPACE}ENDE"” 
280 PRINT" {HOHE RIGHT18 RVSON SPACE RVSOFF}Y"; 
290 GETA$: IFA$=""THEN2IO 
300 IFA$=CHR$ (20) THENS3IO 
310 IFA$=" (RVSOR}" THENRE=1:60T0290 
320 IFA$=" {RVSOFF}" THENRE=0:60T0290 
330 PRINT" CHOHE RIGHT18}Y"A$: IFPEEK (3090) =96THENA 
20 
340 IFRE=OTHENPOKESP ‚„PEEK (3090) 
350 IFRE=1THENPOKESP „PEEK (3090) +128: PDKE3090 ,PEE 
K (3090) +128 
360 PRINT"{HOHE RIGHT}Y"3CHR$ (20) , 
370 SP=SP+1: IFSP=16000THEN420 
380 POKES1 ,176:POKES2,63:G60T0250 
390 IFSP=14848THEN2503 ELSEPDKE3090, 523 PRINT" CHOH 
E INST}":SP=SP-1 
400 IFSP-17>14848THENPOKE3072 ,PEEK (SP-18) sELSEPD 
KES072,32 
419 G0T0380 
420 FPOKESP,9& 
430 PRINT" LCLEAR RIGHT DOHN2YNUNTSPACEIKOENNENT 
SPACEISIEISPACEFDENTSPACEITEXT" 
440 PRINT" {RIGHT43MIT{SPACE}DEM{SPACEIMCDDEPROGR 
AMM{SPACE} (SOFERN{SPACE}DIES" 
450 PRINT" {RIGHT43 IM{SPACE}SPEICHERTSPACEIISTI CS 
HIFTSPACEYABSAVEN. ” 
460 PRINT" {RIGHT43SIETSPACEIKODENNEN{SPACEIDIESES 
tSPACE3}ABGESPEICHERTE" 
470 PRINT" {RIGHTS} PROGRAMM{SPACEIDANN{SPACEIJEDE 
RZEIT{SPACE}WIEDER" 
480 PRINT" (RIGHT4}LADEN{SPACEFUND{SPA ACEIMITLSPAC 
E}SVS{SPACE}14580{SPACEISTARTEN. " 
490 REM HH EEE IE ÄH HEIST AEHE 
500 REM #*x**** ENDE DES LISTINGS ##x#%# 
510 REM HB BBRIRRRRRRIRHIIHHHISIEHRIERHIÄHIIEHENE 

ENDE DES LISTINGS 



























































"ad "in "ui" » ia 






<a1> 
<103> 


<203> 
<120> 
<253> 
<2> 
<96> 
<128> 
<241> 
<180> 
<60> 
<201> 
<80> 
<49> 
<216> 
<100> 
<28> 
<123> 
<24> 
<243> 
<99> 
<88> 
<B6> 


<54> 
<179> 


<164> 
<21> 
<71> 


<251> 


<104> 
<24> 
<242> 
<227> 


<150> 


<157> 
<103> 
<197> 
<171> 
<140> 
<240> 


<179> 
<4> 


OPERATION HAWAII 


Schlüpfen Sie in die Rolle eines Privatdetektives 
und übernehmen Sie einen atemberaubenden 

- Fall. Wohin verschwand der berühmte Völkerkund- 
ler C. D. Allen? 


Warum hinterließ seine letzte Expedition keine 
Spuren und was ist über diese Expedition be- 
kannt? 


Nur Sie können das Rätsel lösen! Dabei werden 
Sie immer wieder in brenzlige, teilweise auch hu- 
morvolle Situtationen geraten, die Ihr Geschick auf 
die Probe stellen. Zwei Dinge sind wichtig: 
Niemals die Nerven verlieren und cool bleiben! 


Für Plus 4 oder C-16 mit 64 KB-RAM 
Kassette 






Nur 





C-16 Speichererweiterung 
64 KB-RAM 


Einfach einstecken und fertig! 


Keine Umbauten oder Lötarbeiten notwendig, da 
eat K- RAM = Steckmodul. 


- i . Volle 60671 Basic Bytes frei. 
Speichererweiterung 


MIICRO-HÄNPLER 





Zusammen mit dem Adventure 
OPERATION HAWAII 


Nur 


@® 60671 BASIC BYTES FREE 


@® Einstecken und fertig! 
Keine Umbauten, da 
Steckmodul. 

a Neu! HOLLYWOOD POKER gibt es jetzt auch für 
den Plus 4! Werfen Sie hierzu einen Blick in die 
ASM! Versand erfoigt grundsätzlich nur per 
Nachnahme zuzüglich 5,— DM Portospesen! 


Auch im führenden Fachhandel sowie in allen 
Kaufhäusern! 


Softwareautoren gesucht! 
Händleranfragen erwünscht! 








im Exklusivvertrieb von: Mitvertrieb: Ein Produkt von 








ng Eckhardt & Gehrmann GbR 
Heinrichstraße 25 

3000 Hannover 1 

Tel. 0511/3447 71 














MMICRO-HÄNPLER 


_Programme 









Bei Fragen zu den Listings steht Ihnen unsere Programmierabteilung für tele- 
fonische Anfragen zur Verfügung. Bitte wählen Sie nur diese Nummer und rufen 
Sie nur zu den angegebenen Zeiten an: Montag-Freitag, 14-16 Uhr! 


05651/30013 











Einnahmen — Ausgaben — Kontoführungen für € 16/116/plus 4 


Kundenrechnungen 


Wichtig! Vor dem Ausdruck auf 
dem Drucker muß auf dem Bild- 
schirm ausgedruckt werden, weil: 
sonst die Variablen nicht die rich- 
tigen Werte besitzen. 


Dieses Verarbeitungsprogramm 
kann für die monatliche Abrech- 
nung benutzt werden. Im Pro- 
gramm kann man diverse Einnah- 
men und Ausgaben festhalten. 
Die verschiedenen Programmtei- 
le, die angesprochen werden kön- 
nen, werden in den folgenden Ab- 
schnitten erklärt. 


Alte Werte laden 


In diesem Programmteil wird ein 
vorher gesicherter SEQ.-FILE 
oachediaden, der User wird aufge- 
fordert, das Band richtig zu spu- 
len und ”PLAY” zu drücken. 


Werte Berichtigen / Löschen 


Dieser Programmteil ermöglicht, 
versehentlich eingetippte Fehler 


zu beseitigen. Man hat die Aus- 
wahl, einen Wert zu löschen oder 
zu berichtigen, der auf der 
Einnahmen- (E) oder Ausgaben- 
(A) Seite steht. Dazu muß man 
sich die jeweilige Zahl merken, 
die beim Bildschirmausdruck ge- 
zeigt wird, und sie eingeben. 


Erfassung (E/A) 


Bei diesem Programmteil werden 
die Einnahmen und Ausgaben er- 
faßt. Es stehen vier Möglichkei- 
ten zur Wahl: 


E: Erfassung der Einnahmen 
A: Erfassung der Ausgaben 
Q: Zurück zum Menü 


(Return): 
Sprung zur Ausdruck- Abfrage 


E = Erfassung Einnahmen 


Hier wird zuerst die Belegnum- 
mer abgefragt, die nur numerisch 
sein darf. Danach wird der Betrag 
der Einnahme abgefragt. Durch 
(Return) Rücksprung zu Abfrage 
(E/A/Q). 


A = Erfassung Ausgaben 


Das Gleiche wie (E), nur das die 
Werte der Ausgaben abgefragt 


werden. 


(RETURN) = Sprung 
Ausdruck-Abfrage 

Hier wird abgefragt, ob ein Aus- 
druck auf dem Drucker (D) oder 
Bildschirm (B) erfolgen soll. 


Werte sichern 


Hier können die Einnahmen und 
Ausgaben gesichert werden. 


Werte ausdrucken 

Bei dieser Abfrage wird direkt in 
die Ausdruck-Abfrage ge- 
sprungen. 


Programm beenden 


Das Programm wird einfach 
beendet. 


ee 


C-16 LISTING + CHECKSUMMEN (06 v1.0) 


10 DIMZ (100) „5(100) „W(100) ,D(100) „UC100) ,„B(100) , 


L(100) ,LI(61) 


20 DIMBE1 (100) „BA1 (100) „H1100) „H2(100) 
so PRINT" {CLEAR}" 3 INPUT"DATUMZSPACEILTT.MM.III"5 


TAG$ 
40 PRINT"ICLEAR}" 


<5> 
<161> 
<226> 
<70> 


50 PRINT"{CLEAR UP2 L.BLÜ RVSON SPACE4 RVSOFF BL 


ACKFEINNAHMEN {SPACE} -{SPACE}AUSGABENESPACEYBEREC 
HNUNG{L.BLU RVSON SPACES RVSOFF BLACK}"3R=0:P=0: 


M=0:0=0 


60 PRINT"{L.BLU RVSON SPACE40 RVSOFF BLACK?" 





<139> 
<116> 


70 FRINT"(HOHE DOHNG RIGHT2YLAITSPACEI={SPACEIAL 





Compups mi 


TE{SPACEFWERTESPACEILADEN" 


<108> 


80 PRINT"{HOME DOHNT RIGHT2YL2ITSPACEI=SPACEIWE 


RTE{SPACE}BERICHTIGEN/LOESCHEN" 








<16> 


90 PRINT"{HOHE DOHNS RIGHT2YL3ZIXSPACEI=tSPACEIER 


FASSUNG{SPACEILE/AI" 


<52> 


100 PRINT"{HOHE DOHNI RIGHT2ILAIXSPACEI=TSPACEIW 


ERTE{SPACEIARSAVEN" 


<90> 


105 PRINT"{HOHE DOHNI1O RIGHTZILSITSPACEI=TSPACEI 





WERTE {SPACE} AUSDRUCKEN" 





<248> 


110 PRINT" {HOHE DOWNI1 RIGHT2YELFITSPACEI={SPACEY 


PROGRAMM{SPACE} BEENDEN" 





120 GETKEYK$: IFK$="1"THENFO0O0 


130 IFK$="2" THENGOTO260 
140 IFK$="3"THENGOTO190 
150 IFK$="4"THENGOTO1140 





<65> 
<191> 
<42> 
<B81> 
<169> 
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Super Joystick 

Nicht ganz billig ist dieser Joy- 
stick, der-vom Ing. Büro Sc 
mann vertrieben wird. Aber in al- 
len Spielsituationen war er wirk- 
lich sein Geld wert. Berührungs- 
freie Schalter erlauben ein un- 
heimlich sauberes Steuern und 
schnelles Reagieren. Immerhin 
98,- DM muß man dafür hinblät- 
tern, allerdings sollten man be- 
denken, daß die Kontakt- und Mi- 
kroschalter anderer Joysticks der 
30,-DM-Klasse nur begrenzte Le- 
bensdauer aufweisen. Außerdem 
fanden wir, daß der Spielspaß mit 
diesem Joystick erheblich zu- 
nimmt. Die Federkraft des Knüp- 
pels läßt sich übrigens durch dre- 
hendesselben regulieren. Erhält- 
lich für Atari ST, Amiga, C 64, 
MSX, C16-Version in Vorberei- 
tung. 

Info: Marathon-Joystick 
Vertrieb: ifi Stechmann, PF 210, 
2152 Horneburg 
























































Das C-16/116 und Plus 4 Pro- 
gramm des Jahres heißtWINTER 
OLYMPIADE. Die. englische 
Fachzeitschrift COMMODORE 
COMPUTING INTERNATIO- 
NAL zeichnete dieses Programm 
mit insgesamt 3 Oskars aus. Zum 
erstenmal gelang es einem. deut- 
schen Software-Haus diese be- 
gehrten Trophäen zu erkämpfen. 
Jeden Insider der Software-Szene 
dürfte dieser Erfolg ein wenig 
überrascht haben, war man doch 
bisher gewohnt, das die national- 
stolzen Engländer mit der Bewer- 
tung ausländischer Software im- 
mer äußerst skeptisch umgingen. 
Nachdem die gesamte deutsche 
Fachpresse aber von diesem Pro- 
gramm und seiner hervorragen- 
den Qualität überzeugt war, ist 
man auch in England letztendlich 
zu dem Ergebnis gekommen, daß 
dies wohl das beste Programm für 
den C-16/116 und Plus 4 ist, das 
im vergangenen Jahr vorgestellt 
wurde. So ist also der Titel ”Pro- 
gramm des Jahres” eine besonde- 
re Auszeichnung. Doch der Lor- 
beeren nicht genug. Es gesellten 
sich gleich noch zwei weitere Os- 
kars Anz: Udo Gertz wurde von 
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| C-16/116/+4 »News« 


Ob 












Speichererweiterung als Einbau- 
service 


ifi Stechmann bietet den einbau 
einer 64k-Speichererweiterung 
für C16/116 ab sofort 99,-DM an. 
Als besonderes Bonbon wird eins 
der leistungsfähigsten 64K- 


Programme kostenlos mitgelie- 
fert. Und zwar entweder ACE, 
MERCENARY oder SCRIPT 
plus. 

Info: s.o. 





Programm des Jahres: 
WINTER OLYMPIADE 


der Fachjurie zum ”Programmie- 
rer des Jahres” gekürt. Er hat 
nach Meinung vieler mit diesem 
Programm neue Maßstäbe im Be- 
reich der Programmierung des 
"kleinen Commodore” gesetzt 
und sollte dafür auch die ihm ge- 
bührende Anerkennung finden. 
Und der dritte und damit letzte 
Oskar für dieses Programm wur- 
de für die "Grafik des Jahres” 
vergeben. Nach Meinung aller Ju- 
roren ist hier eine Grafik geschaf- 
fen worden, die alles bisher Dage- 
wesene in den Schatten stellt. Wir 
möchten uns an dieser Stelle allen 
Gratulanten anschließen und ei- 
nen Glückwunsch und zugleich 
ein Dankeschön an das Software- 
haus Kingsoft und alle Beteiligten 
weiterreichen. Das Dankeschön 
übermitteln wir im Namen aller 
Anwender, die natürlich hoffen, 
daß dieser Erfolg Ansporn dafür 
ist, damit auch in Zukunft ähn- 
lich gute und erfolgreiche Pro- 
gramme produziert werden kön- 
nen. Die Redaktion empfiehlt an 
dieser Stelle allen Usern die noch 
nicht im Besitz der ”Winter 
sind, sich noch 


schnell eine Version zu sichern. 


Ladeprobleme 





nun endlich gelöst? 


Programm: CS] Turbo 
System: C16/Plus 4 

Preis: 29.90 DM 

Hersteller: CS] Computersoft 


Jonik, An der Tiefenriede 27, - 
.3000 Hannover 1, 


Telefon 
0511/886383 


Jeder Besitzer einer Commodore 
Datasette kennt sicherlich die ge- 
fürchtete Fehlermeldung ”LO- 
AD ERROR”. Diese Meldung 
des Computers weist darauf hin, 
das ein Ladefehler entanden ist 
und somit das Programm nicht 
geladen werden kann. Das Pro- 
blem tritt besonders oft auf, wenn 
man versucht Programme zu la- 
den welche von einem anderen 
Computer bzw. einer anderen 
Datasette abgespeichert wurden. 
In der Regel ist hier eine Fehler- 
hafte Einstellung des Tonkopfes 
sowie das relativ unsichere Lade- 
verfahren des C16 schuld. Ob- 
wohl Datasette eigendlich speziell 
für Commodore Rechner ent- 
wickelt wurden, bestehen diese 
meißt nur aus einer billigen Elek- 
tronik. Auch die Einstellung des 
Tonkopfes ist je nach Hersteller, 
es gibt verschiedene Produktions- 
stätten (z.B. Japan o. Taiwan), of- 
fensichtlich unterschiedlich. Um 
diesen die Datasetten genauer zu 
Justieren benötigt man normaler- 
weise ein Ozzilloskop und eine 
entsprechende Justierkassette. Da 
diese Werkzeuge wohl nur den 


wenigsten Computer-Freunden _ 


zur Verfügung stehen, hat die Fir- 
ma CS] ein Programm herausge- 
bracht, welche auch dem Laien 
die Einstellung des Tonkopfes er- 
lauben soll. Das Programm nennt 
sich AZIMUTH-TAPE und wird 
zusammen mit einem TURBO- 
TAPE Verfahren auf einer Kas- 
sette geliefert. Nachdem das Pro- 
gramm AZIMUTH getartet wird 
erscheint eine Art Skale am unter- 
en Bildschirmrand. Läßt man nun 
die Kassette weiterlaufen, so 
flackert der Bildschirmrand und 
ein entsprechender Messzeiger. 
Ein Signalton soll nun dafür sor- 
gen, das man die Datasette richtig 
justieren kann. Um dies zu be- 
werkstelligen dreht man, wäh- 
rend das Band noch läuft, vorsich- 
tig den Tonkopf nach lings bzw. 
rechts. Ziel ist es zu erreichen das 


der Bildschirmrand möglicht ein 


Compute mib 


ruhiges blau, und der Messzeiger 
möglichst garnichts, anzeigt. Wir 
haben diesen Einstellung vorge- 
nommen und.das Ergebnis mit ei- 
nem Ozilloskop überprüft. Es ist 
uns tatsächlich gelungen fast die 
ideal Einstellung zu finden. Aller- 
dings gehört dazu schon etwas 
Fingerspitzengefühl und auch et- 
was Glück, den das Signal, nach 
welchem das Programm die Data- 
sette untersucht ist digitalisiert. 
Dies bedeutet das kleine Pegelun- 
terschiede nicht festgetellt werden 
können, also nur eine Art Mittel- . 
wert eingestellt werden kann. 
Dies dürfte in der Praxis immer 
noch besser sein als überhaupt 
keine Einstellun a 
Das zweite Problem des C16, die 
lansame Datenübertragung, wird 
durch das Programm CS] TUR- 
BO ausgeglichen. Im Vergleich 
zum normalen Lade/Speicher 
Verfahren wird mittels TURBO 
bis zu einer 12 fachen Geschwin- 
digkeit gearbeitet, was sogar eine 
Konkurrenz zum Floppy- 
Laufwerk bedeutet. Nachdem 
TURBO aktiviert ist arbeiten so- 
mit die Befehle LOAD und SA- 
VE mit der 12 fachen Geschwin- 
digkeit. Dateiverarbeitung mittels 
OPEN wird alldings von diesem 
Programm nicht untertützt. In- 
teressant ist auch das Ladeverfah- 
ren, nachdem der Vorspann gela- 
den wurde, wird Programmna- 
me, Programmlänge sowie 
Programmende in HEX und De- 
zimal angezeigt. ° 

Der einzige Nachtel von CSJ 
TURBO ist allerdings das Pro- 
gramme, welche mit dem Pro- 
gramm abgespeichert wurden, 
auch nur mit diesem wieder ein- 
geladen werden können. 

Frank Brall 


Positiv: 

TURBO TAPE erreicht bis zu 12 
fache Geschwindigkeitssteigerung 
Einfache Tonkopfeinstellung oh- 
ne Messgerät 
Günstiges 
hältnis. 
Negativ: ä 
Tonkopfeinstellung nicht ganz 
genau Möglich 

Programme welche mit TURBO 
abgespeichert wurden, können 
auch nur mit TURBO wieder 
eingeladen werden 


Preis/Leistungsver- 


Genesis-Super-Assembler 


Der große Erfolg unseres Assem- 
blers für den C-16 hat uns bewo- 
gen, dieses nützliche und für je- 
den C-16-Programmierer unbe- 
dingt notwendige Utility ab 
sofort auch separat zu vertreiben. 
Der komplette Assembler wird 
inclusive Demoprogramm und 
ausführlicher Anleitung entweder 
auf Diskette oder Tape geliefert. 
Tatsächlich ist GENESIS mo- 
mentan der leistungsstärkste As- 
sembler für den C-16/116/plus 4 
auf dem gesamten Software- 
markt. Ein ganze Reihe von Fea- 
tures erleichtern dabei das Pro- 





grammieren in Maschinensprache 
ungemein. Das besondere Bon- 
bon für die Benutzer von nicht er- 
weiterten Systemen C-16/116 ist 
die Möglichkeit, Quelltexte ‚die 
in Bearbeitung sind, auszulagern 
(auf Diskette oder Tape) ‚um so 
wertvollen Speicherplatz zu 
sparen. 


Genesis-Super-Assembler kostet 
15,-— DM sowohl für Kassette 
wie auch Diskette und ist beim 
Tronic-Verlag, PF 870, 3440 
Eswchwege (Tel.:05651/30011) 
zu beziehen. 


Neues Hardware-Angebot zur Weihnachtszeit 


Rechtzeitig zum Weihnachtsge- 
schäft finden Sie in vielen Kauf- 
häusern und in einigen größeren 
Verbrauchermärkten wieder ein 
Super-Angebot von Commodore- 
Rechner. Der Plus 4 wird einmal 
zusammen mit der Floppy-Disk 
1551 zum Preis von ca. 500,- DM 


und einmal zusammen mit einer 


Datasette zum Preis von ca. 250,-- 
DM angeboten. Im Hause Com- 


modore rechnet man mit ähnli- 
chen Absatzerfolgen wie bei den 
vorangegeangen Verkaufsaktio- 
nen des C-16/116. Nutzen Sie die- 
se günstigen Verkaufsaktionen, 
aber achten Sie auch auf die mit- 
gelieferte Hardware, damit Sie 
keine bösen Überraschungen 
zum Fest erleben, weil für Ihren 
Bedarf den falschen Computer ge- 
kauft haben. 





Tr ——— 


Deutscher Zeichensatz 

Einen deutschen Zeichensatz für 
den C-16/116/plus 4 kann man 
jetzt als Eprom erwerben. Ein- 
fach einstecken, schon kann man 
mit dem mitgelieferten Schalter 


zwischen ASCI und deutscher 
DIN-Norm wählen, genauso, wie 
es bei dem Commodore 128’er 
ist. Im Lieferumfang sind Taste- 
naufdrucke mit den Doppelbele- 
gungen enthalten. Kingsoft 


Supertooi für C-16/1 16/plus & 


In diesen Tagen soll ein neues 
Hardwaretool auf den Markt ge- 
langen, daß die Systeme 
C-16/116/plus 4 um einige we- 
sentliche Funktionen erweitert. 

So beinhaltet die Platine, die in 
den Expansionport gesteckt wird, 
ein BASICTOOLKIT, welches 
das eingebaute Basic um die sehr 
wichtigen Funktionen MERGE, 


OLD, CHANGE, DUMP und 
Listing-Scrollen in beide Richtun- 
gen erweitert. 

Außerdem enthält das Tool noch 
ein fest eingebautes Turbotape, 
welches in einer erweiterten 
Form vorliegt und nun auch die 
kopletten 64K des plus 4 (oder des 
aufgerüsteten C-16/116) abspei- 
chern und einladen kann. Das 


Komplette Textverarbeitung mit dem € 16 


Programm: Text C16 

System: C16 

Preis: 29.90 DM 

Hersteller: CS] Computersoft Jo- 
nigk, An der Tiefenriede 27, 3000 
Hannover, Tel.0511/886383 


Nach dem es Anfangs noch rela- 
tiv wenige brauchbare Program- 
me für den kleinen C16 gab, häu- 
fen sich in den letzten Monaten 
die Angebote von preißwerter 
Software. Auch für den Anwen- 
der welcher den C16 als günstiges 
Textsystem einsetzen möchte, 
stehen mittlerweile einige Pro- 
gramme zur Verfügung. Leider 
arbeiten die meißten lediglich mit 
Diskette zusammen welche aller- 
dings durch ihren relativ hohen 
Preis nur eine mäßige Verbrei- 
tung verbreitung gefunden hat. 

Anders hier bei dem neuen Text- 
programm "TEXT 16” von CS]. 
Bei diesem Programm wurde nun 
entlich die Möglichkeit geschaf- 
fen, Texte wahlweise auf Diskette 
oder Kassette abzulegen. Neben 
dieser Eigenschaft zeigt sich je- 
doch dieses Programm auch noch 
in vielen anderer Hinsicht als sehr 
leistungsstark. So erfolgt bei- 
spielsweise die Editierung eines 
Textes voll bildschirmorientiert. 
Mit den Cursortasten kann also 
jede beliebige Stelle des Textes an- 
gefahren und Änderungen vorge- 
nommen werden.Gelangt man 
mittels Cursor über die Bild- 
schirmbegrenzungen, so wird wie 
bei jedem besseren Textpro- 
gramm das Fenster gescrollt. Dies 
gilt bei dem Programm TEXT 16 
sowohl für das überschreiben der 
horizontalen oder der vertikalen 
Bildschirmbegrenzung, Etwas 
mager sieht es mit der maximalen 
Textgröße aus, lediglich 72 Zeilen 
zu je 70 Zeichen lassen. sicht mit 
diesem Programm bearbeiten. 
Für die Korrespondenz dürfte 


dies zwar ausreichen, wer jedoch 
mehr als eine DIN A 4 Seite bear- 
beiten muß oder möchte dürfte 
an den Grenzen des Programmes 
scheitern. 

Beeindruckent sind allerdings die 
Anzahl der Funktionen welche in 
das Programm integriert wurden. 
Neben Standard Funktionen wie 
SAVE,R, LOAD ‚LÖSCHEN 
‚DRUCKEN. stehen auch Funk- 
tionen zur Verfügung um Textse- 
quenzen zu suchen oder zu erset- 
zen. Selbst ein WORDWRAP- 
Algorithmus welcher dafür sorgt 
das ein Wort welches nicht mehr 
in die Zeile paßtautomatisch in 
die nächste übernommen wird, ist 
in dieses Programm integriert. 
Der Aufruf aller Funktionen oder 
Befehle erfolgt über ein sogenann- 
tes KOMMANDOMENU, wel- 
ches über die HELP Taste einge- 
blendet wird. Da das Programm 
somit ausschließlich über ein Me- 
nü gesteuert wird, bedarf das Pro- 
gramm keiner langen Einarbei- 
tung, selbst die mitgelieferte An- 
leitung kann nach wenigen 
Minuten beiseite gelegt werden. 
Im Test zeigte sich das Programm 
als sehr schnell und benutzer- 
freundlich. Lediglich der Um- 
stand das Umlaute nicht auf dem 
Bildschirm zu finden sind ließ 
Anlaß zur Kritik. 

Frank Brall 


Positiv: 

Voll Bildschirmorientiert 
Wordwrap 
Zusammenarbeit 
te/Kassette 
Gutes Preis/Leistungsverhältnis 
Sehr Benutzerfreundlich 


mit Disket- 


Negativ: 

Maximal eine DIN A4 Seite be- 
rarbeitbar 

Keine Umlaute auf dem Bild- 
schirm 





neue Turbotape enthält zudem 
noch die Möglichkeiten, den 
MERGE-Befehl im Turbomodus 
auszuführen und führt zusätzlich 
noch ein VERIFY aus. 


Besonders die plus 4 - Besitzer 
werden sich über dieses Tool freu- 
en können, da es zwei erhebliche 
Mankos bzw. Fehler in den einge- 
bauten Programmen des plus 4 
beseitigt. 

Einmal können jetzt auch Data- 
settenbesitzer mit dem Textpro- 


gramm arbeiten, da beim Laden 
und Absaven nach der Art des 
Massenspeichers gefragt wird. Der 
Programmfehler in der Datenver- 
waltung wurde auf gleicher Weise 
behoben. Bei all diesen Vorteilen 
ist es erstaunlich, daß man für die- 
ses Zubehör nur 49,- DM auf den 
Ladentisch legen muß. 
Info: Kingsoft, F. Schäfer 

Schnackebusch 4 

5106 Roetgen 

Tel.: 02408/5119 
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155 IFK$="5"THEN GOTO 560 

160 IFK$="9"THEN PRINT" {CLEAR} "END 

170 IFK$=CHR$ (13) THEN GOTOSO 

180 IFK$=""THEN GOTOSO 

190 PRINT" {CLEAR}":Q$="":PP=0 

200 INPUT" €DOHNS RIGHTZ2 DOHNFEINGABESPACEITE/A/ 
01:";0$ 

210 PRINT" CLEAR}" 

220 1FQ$="E"THENGOTO460 

230 IFQ$="A"THENGOTOS1O 

240 IFQ$=""THENGOTOS#0 

250 IFO$="@"THEN GOTO 50 

260 PRINT" {CLEAR}" 

270 PRINT" {RIGHT143WERT {SPACEILDESCHEN" 

280 PRINT"{RIGHT14 CY133" 

270 INPUT" {DOHN43BITTE{SPACEINUMMER{SPACE}DESTSP 
ACEIWERTESTSPACEFEINGBEBEN{SPACEZY" 5X 

300 PRINT" {DOHNIESPACEIDDER{SPACEIA" :GETKEYEAS 
310 IFEA$="E"THENPRINT"{DOUHN2 RIGHT23"32(X) 

320 IFEA$="A"THENPRINT"{DOHN2 RIGHT2>"3WIX) 

330 IFEAS=""THEN 190 

340 PRINT" (DOUN2ILOESCHEN{SPACEIODERTSPACE}AENDE 
RNCSPACEITL/AITSPACE2} " :GETKEYA$: IFA$="L"THENS7O 
350 IFA$="A"THEN410 

360 60T0260 

370 Hi1=0:H2=0 

380 IFEA$="E"THEN Z(X)=0.01:H1(X)=1:50X)=0.00 
390 IFEAS="A"THEN WCX)=0.01:H2(X)=1:DIX)=0.00 
-400: G0TO 600 

410 INPUT" CDOHN23 NEUER {SPACE} WERT" ZOW 

420 FF=(RW#14) /100:DD= (QW/114)*14 

430. IFEA$="E"THENZ (X)=QW:SCX)=FF 

430 IFEA$="A"THENW (X) =OWSD(X)=DD 

450 G0T0600 

460 U=U+13 INPUT" DOHN RIGHT2}BELEGNUMMER{SPACE2}Y 
"BEI (U) E INPUT" DOWN RIGHTZIEINNAHMEN{SPACE) LDMI 
tSPACE23"3Z(U) 

470 IFZ(U)=0.00THENGD TO 1690 

480 S(W)=(Z(U)*14) /100 

490 PRINT"CLEAR}" 

500 60 TO 460 

510 B=B+1: INPUT" CDOHN. RIGHT2IBELEGNUMMERTSPACE2}I 
"zBA1(B) : INPUT" DOWN RIGHT2IAUSGABEN{SPACE2}LDM] 
{SPACE2}";W(B) 


520 IFW(B)=0.00THEN GO TO 1700 

530 D(B)=(WiB)/114) #14 

540 PRINT" {CLEAR}" 

550 60 TO 510 

560 INPUT"{CLEAR RIGHT2 DOWNYAUSDRUCKLD/BI"3AS$ 
570 IFA$="D"THENGOTO1760 

580 IFA$="B"THENGOTO600 

590 IFA$=""THENGDTOSO 

&00 PRINT" {CLEAR RIGHT2IAUSWERTUNG{SPACEIE/ALSPA 
CE3RECHNUNG{SPACE23" 3 TAGS 

&10 PRINT"{RIGHT2 CY33 DOHN?" 

&20 PRINT"EINNAHMENSPACEAIMWST SPACESIALISGABENT 
SPACE3}VORST" 

&30 PRINT"{CY9 SPACE4 CY4 SPACES CY8 SPACE3 CY5} 





























640 R=0:M=0:0=0:P=0: AS=0: AD=0: AQ=O 

„650 J=0:G0T01710 

&60 R=0:M=0:0=0:P=0:AS=0: AC=0: AA=O 

670 FORT=1T06 

680 J=J+1:PP=PP+i 

690 R=R+Z (T) 2M=M+S (T) :0=0+W (CT) :P=P+D(T) 

790 IFZ{T)=0.01THENZ (T)=0.00:R=R-0.01:60T0720 
710 IFW(T)=0.01THENW(T)I=O. 00: 0=0-0.01:60T0720 
720 PRINTUSING"#4####.4#"3 7 (T) 

730 PRINTUSING" {UP RIGHT IOYHHHH.#4"35(CT) 

740 PRINTUSING" UP RIGHT22Y##H##.##";WCT) 


750 
7860 
770 
780 
790 
vY7}" 
800 
810 
820 


PRINTUSING" {UP RIGHT313>#4##.##"5D(T) 
PRINTUSING"{UP RIGHT1S RVSONF#HHLRVSOFF}" SPP 
IFJ=18THENJ=0:GETKEYA$:FRINT"{CLEARF" 

NEXT 

PRINT"{DOHN CY9 SPACE CYT SPACES CYS SPACE C 
PRINTUSING" ####4#.4#" sR+Ri1 

PRINTUSING" {UP RIGHTL1OYRHER.#8" 5; M+M1 
PRINTUSING" {UP RIGHTZ2Y44#44.4#"50+01 
PRINTUSING" {UP RIGHT313#4##.4#";P+P1 

PRINT" {DOHN? ==={SPACE}======={SPACESI= 








AS=0-P: AC=SR-AS : 
FRINT: PRINT" {SPACE3FGEWINN{SPACEFV.ST. = {SPAC 


870 
E23 "USING" {SPACE2YDMTSPACEFRHHHHHRE. HR" ZAC 


<115> 
<171> 
<135> 
<21> 

<208> 


<118> 
<240> 
<22> 
<219> 
<169> 
<Aa> 
35> 
<220> 
<192> 


<85> 
<212> 
<173> 
<101> 
<354> 


<190> 


<196> 


<184> 
<99> 
<216> 
<25> 
<214> 
<132> 
<221> 
<150> 
<250> 
<8> 


<152> 
<200> 
<51> 
<9> 
<108> 


<92> 


<40> 
<41> 
<60> 
<142> 
<180> 
<245> 
<32> 
<157> 


<85> 
<35> 


<227> 


<232> 
<123> 
<62> 
<145> 
<«129> 
<38> 
<97> 
<43> 
<129> 
<50> 
<167> 
<37> 
<138> 
<89> 
x2> 
<145> 


<96> 
<25> 
<60> 
<23> 
<25> 


<80> 
<185> 


<29> , 


<238> 


| 1040 


__ programme 


880 PRINT:PRINT"{SPACEIINETTO{SPACEIMWST{RIGHT2Y 
3 CSPACE23 "USING" {SPACEZIDM{SPACEIHHHHERHE. HN" AD 
890 BETKEYA$:GOTO1130 
900 PRINT"{CLEAR RIGHT11>SEQ.-{SPACEIFILETSPACE} 
LADEN" 
910 PRINT" {RIGHT11 CY16}" 
920 PRINT"{RIGHT7 DOWN2IBITTELSPACEIBAND{SPACEIR 
ICHTIG{SPACE}SPULEN" 
930 PRINT"{RIGHTZ DOHN2>DANACHTSPACE}LRETURNITSP 
ACE3DRUECKEN" 
940 GETKEYA$: IFA$=CHR$ (13) THENIGO 
950 GDT0700 
960 PRINT" {CLEAR} " : INPUT"DATEINAME" ; NAMES 
970 IFU>BTHENBEI (U+1)=999999: BA1 (U+1)=999999: GDT 
0970 
980 IFB>UTHENBEI (B+1)=999999: BA (B+1)=999999 
990 OPEN1,1,0,NAME$ 

1000 FORT=1TD0100 

1010 INPUT#1,Z(T) 

1020 INPUT#1,5(T) 

1030 INPUT#1,W(T) 
INPUT#1,D(T) 
INPUT#1 ,BE1(T) 
INPUT#1,BA1(T) 
INFUT#1,H1(T) 

1080 INFUT#1,H2(T) 

1090 IFBE1{T)=999999ANDBAI (T)=999999THENCLOSE1:G 
DT01360 

1100 NEXT 

1110 CLOSE 1 

1120 60T0190 

1130 6DT0190 

1140 PRINT" CLEAR RIGHT12ISEQ. -SPACEIFILETSPACE 
3SICHERN" 

1150 PRINT" {RIGHT12 CY16}" 

1160 PRINT"{DOHN4 RIGHTSIBITTELSPACE}BAND{SPACEY 
RICHTIG{SPACEFSPULEN" 

1170 PRINT"{DOHN2 RIGHTSIDANACHTSPACEILRETURNITS 
PACE3DRUECKEN" 

1180 GETKEYK$: IFK$=CHR$ (13) THEN1200 

1190 60TO 1140 

1200 PRINT" CLEAR} ": INPUT"DATEINAME" ; NAHMES 

1210 IFU>BTHENBE1 (U+1)=999999: BAl (U+1)=999999 
1220 IFB>UTHENBE1 (B+1)=999999: BAl (B+1)=999999 
1230 OPEN1,1,1,NAHME$ 

1240 FORT=1T0100 

1250 PRINT#1,2(T) 

1260 PRINT#1,S(T) 

1270 PRINT#1,W(T) 

1280 PRINT#1,D(T) 

1290 PRINT#1,BE1(T) 

1300 PRINT#1,BA1(T) 

1310 PRINT#1,H1(T) 

1320 PRINT#1,H2(T) 

1330 IFBEI(T)=99999FANDBAL (TI=999999THENCLOSE1:6 
0T0190 

1340 NEXT 

1350 G60T070 

1360 PRINT" CLEAR RIGHTZIAUSWERTUNG{SPACEIE/ATSP 
ACE}RECHNUNG{SPACE2?" 3 TAG$ 

1370 PRINT"{RIGHTZ CY33 DOUN}" 

1380 PRINT"EINNAHMENTSPACE4IMWST {SPACESIAUSGABEN 
XSPACE3IVORST" 

1390 
zu 
1400 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
er7y" » 

1590 PRINTUSING"#HHRHH. HH" R+R1 























1050 
1060 
1070 

















R=0: M=0: 0=0: P=0: AS=0: AC=0: AQ=O 

J=0:G60T01750 

R=0: M=0: 0=0: P=0: AS=0: AC=0: AB=0 

FORT=1T06G 

J=J+1:PP=PP+1 

R=R+Z (T) =M=M+5 (TI 20=0+W (T) :P=P+D(T) 
IFZ(T)=0.00ANDHi (T) =1THENU=U+1 
IFW(T)=0. O0OANDH2 (TI) =1THENB=B+1 

IFZ(T) >0.00THENU=U+1 

IFW(T) >0.00THENB=B+1 

IFBE1 (T)=999999ANDBAI (T)=999999THENGOTO15S80 
PRINTUSING"#####.##"3 ZT) 

PRINTUSING" {UP RIGHTLOYRHRH.#8"55(T) 
PRINTUSING" {UP RIGHT223##H#H#.##"3W(T) 
PRINTUSING" {TUR RIGHTZLI#HHH.##"5DCT) 
PRINTUSING" {UP RIGHTISE RVSONYHHÄRVSOFF}"3PP 
IFJI=18THENJ=0: GETKEYA$: BEINTSTEESARFTE 

NEXT 








Gompute mib 


<124> 
<69> 


<123> 
<74> 


<98> 


<240> 
<16> 
<4> 
<59> 


<207> 
<84> 
<188> 
<24> 
<166> 
<148> 
<175> 
<109> 
<Ia> 
<ab> 
<53> 
<68> 


<160> 
<210> 
<92> 

<186> 
<196> 


<158> 
<99> 


<178> 


<207> 
<49> 
<232> 
<202> 
<193> 
<69> 
<57> 
<9> 
<171> 
<153> 
<179> 
<114> 
<61> 
<51> 
<58> 
<73> 


<155> 
<195> 
<214> 


<80> 
<30> 


<222> 


<227> 
<118> 
<89> 
<138> 
<124> 
<33> 
<I2Rr: 
<42> 
<29> 


<246> 


<12> 
<213> 
<75> 
<192> 
<62> 
<164> 
<115> 
<27> 
<170> 


<121> 
<50> 


4 


programme 











1600 PRINTUSING" {UP -RIGHTLOFRREE.##" 3 M+M1 <85> 
1610 PRINTUSING"{UP RIGHT2234####.##"50+01 <48> 
1620 PRINTUSING" {UP RIGHT313####.##"3P+P1 <48> 
1630 PRINT" {DOUNY= ={SPACE}======={SPACES} 
s======={SPACE}==== <105> 
1640 AB=M-P <210> 
1650 AS=D-PzAC=R-AS <54> 
1660 PRINT=PRINT" {SPACE3IGEWINNISPACEIV.ST.2 {SPA 

CE23 "USING" {SPACE2IDMLSPACEIHHHHRRHR. AH" AT <7> 
1670 PRINT:PRINT" (SPACE3}NETTO{SPACEIMWST{RIGHT2 

32 {SPACE2I "USING" {SPACEZIDM{SPACEIHRHRRHRH. HH" A 

{>} = <149> 
1680 GETKEYA$:GDTO40 <192> 
1690 U=U-1:6070190 <125> 
1700 B=B-1:60T0190 <59> 
1710 IFU>BTHENG=U:GOTO1740 <206> 
1720 IFB>UTHENG=B: GOTO1740 <102> 
1730 IFU=BORB=UTHENG=U <228> 
1740 GDT0670 <44> 
1750 G=T:G60T01430 <242> 
1760 OPEN 4,4 <65> 
1770 LI=O <164> 
1780 PRINT#4," (SPACE20FAUSWERTUNGTSPACEIE/ALSPAC 
E>RECHNUNG{SPACE2}"+TAG$ <214> 
1790 PRINT#4,"{SPACE2O CY33}" <51> 
1800 PRINT#4,"" <197> 
1810 PRINT#4, "EINNAHMEN{SPACESIMWSTSPACESIBENR. 
tSPACESIAUSGABEN{SPACES}VORST{SPACESIBENR. " <150> 








CrYE SPACES CY5 SPACES cvyY5}>" <b3> 
1850 FORL=1T06 <254> 
1840 LI=LI+1 <27> 
1850 Al=Z(L) <17> 
1860 A2=S(L) <i> 
1870 A3Z=W(L) <29> 
1880 A4=D(L) <221> 
1890 AS=BE1(L) <154> 
1900 Ad=BA1(L) <146> 
19710 PRINT#4 USING" #####. ##{SPACES} ";A1,A2,A5,A3 

‚AA,A& <180> 
1920 IFLI>&0THENGDSUB2020 <120> 
1930 NEXT - : <19> 
1940 PRINT#4,"{CY9 SPACE4 CYS SPACEIS CYB SPACES 

crs}" <228> 
1950 PRINT#4 USING" #HR##. #H{SPACESI"ZR,M," {SPACE 

73" ,0,P <196> 
1960 PRINT#4 ,"========={SPACE4}======== {SPACE 18) 
=====2==2=(SPACE5}======= =" <166> 
1970 PRINT#4,"" <111> 
1980 AQ=M-P <39> 
1990 PRINT#4 ,"{SPACE133NETTO{SPACEIMWSTERIGHT2}: 
ASPACE2} "USING" (SPACE2IDMISPACEIRHRHRRHH. HR" ZA <106> 
2000 PRINT#4 ,"{SPACE28}3======an2==smm <166> 
2010 CLDSE4:G0T040 <223> 
2020 LI=0:FORT=1T06: PRINT#4,""3NEXT:RETURN 


ENDE DES LISTINGS 


<80> 





s 


Bildschirmmasken — wirklich »eusy«: 


Screen-Editor 





Dieses Programm ermöglicht es 
Ihnen, für Ihre,eigenen Program- 
me Bildschirmmasken zu entwer- 
fen. Diese können nach Belieben 
in PRINT-Zeilen eingebettet, als 
Maschinenprogramm _abgespei- 
chert und/oder auf’ dem Drucker 
ausgegeben werden. Weiterhin 
besteht die Möglichkeit, in einer 
8*8-Matrix eigene Zeichen zu de- 
finieren und diese in die Maske 
einzubauen. : 


Nach dem Start von SCREEN- 
Editor hat man die Whl, ob man 
die vorgegebenen ASCII-Zeichen 
verwenden oder eigene Grafikzei- 
chen entwerfen will. Wählt man 
das Letztere, so hat man folgende 
Funktionen zur Auswahl: 


Cursor-Steuertasten: 
Steuerung des Zeichencursors in 
der Matrix 


SPACE: 
Punkt setzen bzw. löschen 


E: 
Neu entworfenes Zeichen spei- 
chern 


CLEAR/HOME: 
Löschen der Matrix 


Wenn man keine weiteren Zei- 
chen mehr entwerfen will, tippt 
man bei der entsprechenden Fra- 
ge auf die N-Taste und kommt so- 
mit in das nächste Menü, welches 
die Funktionen erläutert, die bei 
dem Maskenentwurf zur Verfü- 
gung stehen. 


Die Belegung der Funktionsta- 
sten F1, F2, F3 werden im folgen- 
den erklärt: 


Sompute miß 


F1: Nach Drücken dieser Taste 
wird der Bildschirm gespei- 
chert und es folgt die Frage 
nach der Zeilennummer, ab 
der die PRINT-Zeilen begin- 
nen sollen. in auch - 
geklärt ist, a er eigentli- 
che Umwan sp des 
entworfenen SCREENS in 
Programmzeilen. Hiernach er- 
scheint das letzte Menü, daß 
das Programm bietet. Dieses 
bedarf keiner weiteren Erläu- 
terung. 


F2: Hier wird zuerst auch die 
Maske gespeichert, bevor der 
Bildschirm gelöscht und der 
SCREEN als Maschinenpro- 
gramm auf Band übertra- 
gen wird. Die Maske kann je- 
derzeit wieder mit LOAD 
”SCREENNAME”,1,1 gela- 


den werden. 


F3: Diese Taste sollte nur ge- 
drückt werden, wenn ein 
Drucker angeschlossen ist. 
Sollte dies der Fall sein, kann 
man beruhigt F3 drücken 
und die bis zu diesem Mo- 
ment entworfene Maske 
wird ausgedruckt. Es ist je- 
doch zu beachten, daß nur 
der Originalzeichensatz aufs 
Papier gebracht werden 
kann. Nach dem Ausdruck 
können Sie weiter an Ihrem 
Werk arbeiten oder es mit 
Hilfe von F1 oder F2 sichern. 


Ich denke, daß diese ausführli- 
chen Erläuterungen ausreichen, 
um Ihnen zu verdeutlichen, wel- 
che Möglichkeiten mit diesem 


Programm gegeben sind. Viel 
Spaß! 


xrx 


Compute mit — Sonderheft — 1/87 


Compute mit — Sonderheft — 1/87 


C-16 LISTING + CHECKSUMMEN (0OC V1.0) 
O REM OHREN 
i REM + ® 
2 REM # SCREEN - EDITOR * 
ZZ REM # * 
4 REM * * 
SEREM 8 BY MARKUS HOLZDEFPE * 
6 REM * * 
7REM #* (C) 1986 * 
8 REM * %* 
9 REM RBBHHBHBRHBHHBBIEIE IE IHRER 


10 POKE65298, 196: POKE65299 ,208 

20 COLORO,1:COLOR4,1:C0LOR1 ,2:POKES1 ,0:POKES2,56 
:POKESS,0:POKES6,56:CLR 

30 FOKE1344,0 

40. PRINT"{CLEAR BLACK3MONITOR{DOHNS}"=PRINT"TSP 
ACE>DOOOLSPACE?DBOOTSPACEISBOO" : PRINT" DOUNIX"TP 
RINT" {DOHNFGOTOGO" 

SO POKE1319,19:FORI=1320101323:FOKEI ,13:NEXT:PODK 
E239 ,5: END 

&0 FRINT"CHHITE CLEAR RVSON SPACET+S{SPACEITISPA 























ACE> 1XSPACEITSPACEIDLSPACEIRISPACESY" 

70 O FRINT" {DOHN23BITTETSPACEFWAEHLEN{SPACEISIETSP 
ACE>IE" 

80 FRINT"{DOWN4 RVSON SPACEF1{SPACE RVSOFF SPACE 
23SCREEN{SPACE}MITTSPACEIDEN{SPACE } VORBEGEBENENT 
SPACEYZEITSPACEI-XSPACES DOUHN SPACE2ICHEN{SPACE}I 
ENTWERFEN" 




















90 PRINT"{DGOHN3 RVSON SPACEYZ2{SPACE RVSOFF SPACE 








23NEUELSPACE}IZEICHEN{SPACEFENTWERFENTSPACEIFUERT 
SPACE}DEN{SPACE7 DOWN SPACE2}SCREEN" 

100 GETKEYA$: IFA$Z>"1"ANDA$S<>"Z2"THENIOO 

110 ONVAL (A$)GOTOS40,120 

120 PRINT" CLEARYAB{SPACEIWELCHER{SPACEIZEILEISP 
ACE}SOLLEN{SPACEIDIE TSPACEFDATENTSPACE}FUER" 

130 INPUT" <DOHN}DIE SPACE }NEUEN{SPACE} ZEICHEN{SP 
ACE>ABGESPEICHERT {SPACEIWERDEN" 3EZ: IFEZ<Z0000REZ 


?&60000THEN120 




















ACEIRISPACEFELSPACEFE (SPACEINISPACEIIELSPAGEIDS 
PACE} IXSPACEITSPACEFOTSPACEIR{SPACES" 

150 50 PRINT" DOWNFSTEUERUNGLSPACE?MITLSPACEIDEN{SP 
ACE RVYSONYCURSORLSPACEI-TSPACEITASTEN" 

160 PRINT" {DOHN>PUNKTESPACEISETZEN{SPACEIUNDESP 
ACE3LOESCHENTSPACEIMITLSPACE RVSON SPACE>YSPACE{S 
PACEYI" 

170 © PRINT" {DOHNINEUES{SPACE}ZEICHEN{SPACE}ISPEICH 
ERN{SPACEIMIT{SPACE RVSON SPACEYIFISPACEH" 

189 PRINT" {DOHNFLOESCHEN{SPACE}DES{SPACEISCREENS 
tSPACEIMITLSPACE RVSON SPACEITLRISPACE RVSOFFY" 
190 PRINT" {DOHN2}" 

200 FORI=1T0O8SFRINTTAB(16)".ern un. "3NEXTEA=356B 
»:FOKEA,174:X=0: Y=0 

210 GETKEYA$: IFA$="F"THEN31O 

220 FORT=1T010:NEXT 

230 IFA$="{CLEAR} "THENPRINT" {UP9}"2GOT0200 

240 IFA$=" {LEFT}"ANDX>OTHENX=X-1:60T0300 



























































250 IFA$=" {RIGHTY "ANDX<7THENX=X+1:G0T0300 

260 IFA$="£UP}"ANDY>OTHENY=Y-1:60T0500 

270 IFA$="DOHN}"ANDY<7THENY=Y+1:GOTOS00 

280 IFA$="{SPACE}Y"ANDPEEK (A)=174THENPOKEA,2095EL 


SEFOKEA,174 

290 GOTO210 

300 POKEA,PEEK (A) -128: A=3568+X+40#Y: POKEA,PEEK (A 
)+128: 6010210 

310 FORI=0T07:W(I)=0:NEXT:P=0: 2=0 

320 POKEA,PEEK (A) -128: FORI=3568BTOSB48STEPA0: FORJ 
=1T01+7 E 

330 IFPEEK (J)=81 THENW(ZI=W(Z)I +2” (7-P) 

340 F=F+1:NEXT:P=0: Z=Z+1:NEXT 
ACEHRISPACEHETSPACTEYETSPACEIN{SPACE3IYETS: KSPACEIDIS 
PACE>I{SPACEITLSPACEIOLSPACEIR{SPACESI" 

360 POKE#5298 , 192: POKE45299 „56: FORI=0T07: POKE143 
36+1 ,W(II NEXT 

370 PRINT" {DOHNYSO{SPACEISIEHT{SPACE>DASESPACEIV 
ON{SPACE} IHNEN{SPACE+}ENTWORFENE{SPACEYNEUE {SPACE 
2 DOHNYZEICHEN{SPACEFAUSTSPACE}I: {SPACEI@" 

380 PRINT" {DOHN2FSOLL{SPACEIESTSPACEFHVUEBERNOMMEN 
TSPACE}WERDENTSPACE}ITLSPACEI {ELASHONIJTELASHOFF 
I/XFLASHONYN{ELASHOFFY)" 

390 DO:GETKEYA$:LOOPUNTILA$S="J"ORAS="N" 

400 IFA$="IJ"THEN410:ELSES1O 

410 PRINT" (DONN2I DURCHCSPACEIWELCHESTSPACEIZEICH 
ENTSPACEISOLLT{SPACEIESTSPACEIERSETZTISPACEZ DOHN 















































“372 
<98> 
<24> 
«100> 
<101> 
<33> 
<103> 
<58> 
<105> 
<12> 
x93> 


<213> 
<220>7 
<209> 


«56? 


<151> 


<75> 


<120> 


<119> 
<101> 
<36> 


<185> 
<244> 


<231> 


<34> 


<253> 
<145> 


<108> 
<188> 


<65> 
«897> 
<235> 
<115> 
<109> 
<200> 
<952 
<186> 


<78> 
<99> 


<154> 
<13> 


<205> 
<173> 
<11> 

<i86> 


<184> 
<3> 


<128> 
<215> 
<122> 


tips & tricks 


3WERDEN{SPACEI?ISPACE}I: TSPACE2 LEFT}Y";3 

420 GETKEYA$:PRINTA$: A=PEEK (3563) : IFA<10ORA>127TH 
ENFRINT"{UP6}":G0T0410 

430 FORI=0T07:POKE14336+A#8+1 ,W(I) NEXT 

440 POKE65298, 196: POKE65299,208 

450 PRINT" CLEAR, KHITE}"EZ"D{SAF" 3 sPRINTMID$ (STR 
SA) „2,LEN(STRELCAY)-II","3 

A&O FORI=0TO&: :PRINTMIDS{STR$(WID),, 2,LEN (STR$ (WI 
IDDY)-1)","32NEXT 

470 PRINTMID$ (STR$(W(7)) „2. LEN(STRECWH(TIY)-1) 
480 PRINT"EZ="EZ":60T0500" 

490 POKE1319,19:POKE1320,13:POKE1321,13:POKE239, 
S:END 

500 EZ=EZ+1 

510 POKE65298, 1956: POKEA5297,208 

520 PRINT"{CLEAR HHITE DOWN2YSOLL{SPACEYIEIN{SPAC 























RTSPACE DOHNFWERDENTSPACE3 ?XSPACE} (LFLASHONYJKE, 
LASHOFF}Y/KELASHONYN{ELASHOFFY)" 
530 GETKEYA$: IFA$="J"THEN140 











ACEIRLSPACEIETSPACEIELSPACEINISPACESIETSPACEHDIS 
PACE}1{SPACEITLSPACEIOTSPACEIRISPACES}" 

550 PRINT"{DOWN2 RVSON3CURSOR-TASTEN{RVSOFF SPAC 
E}: (SPACE}STEUERUNG{SPACE}DESTSPACE}TURSORS"- 
560 PRINT"{DOHN RVSON SPACEICISPACEILLSPACEIRISP. 
ACE RVSOFF. SPACE}: (SPACEILOESCHEN{SPACEIDES{SPAC 
E}SCREENS" - 

570 PRINT"tDOHN RYSON SPACEIHOME{SPACE RVSOFF SP 
ACE} 3 (SPACEISETZEN{SPACEIDESTSPACEICURSORSTSPACE 
FANISPACEIDIE{SPACEIOBERESPACEPILINKESPACEFCUR 
SORPOSITION" 

580 PRINT"{DOWN RVSON SPACEIDISPACEYELSPACEILISP. 
ACE RVSOFF SPACE}: (SPACEILOESCHEN{SFACEIDESTSPAC 
E3ZEICHENSCSPACEILINKS (SPACE 13} DERTSPACEITURSORP 
OSITION" 

590 PRINT"{DOHN RVSON SPACEIF{SPACEII{SPACE RVSO 
EE SPACE}: (SPACE }UMWANDLUNG{SPACE}DES{SPACEISCRE 
ENS{SPACEIINLSPACE RVSONFPRINT{RVSOFFI-ISPACEBIZ 
EILEN" 

600 PRINT"{DOHN RVSON SPACEIFLSPACEIZISPACE RVSQ 
EE. SPACE}: (SPACEIABSPEICHERN{SPACE}DESTSPACEISER 
EENSTSPACEIALSTSPACEIMALSPACEI-SPACEBISCHINENPR 
OGRAMM" 

610 PRINT"{DOHN RVSON SPACEIFLSPACEISTSPACE RVSO 
EE SPACE}: {SPACEIAUSDRUCKTSPACEIDESTSPACEISCREEN 
S{SPACE}? (NUR{SPACEIBEI" 

&20 PRINT" SPACESIORIGINALZEICHENSATZ{SPACEIMOES 
LICHTSPACEY) " 

630 PRINT"{SPACES DOHWN23BITTE{SPACEIDRUECKEN{SPA 
CEISIETSPACE RVSON SPACEISTSPACEIPISPACEIATSPACE 
}CtSPACEIETSPACE RVSOFF}“ 

640 GETKEYA$: IFA$< >" SPACE} "THENG40 





































































































PACE3 LLSPACEITSPACEIOLSPACEIRISPACES}" 

660 PRINT"(DOHN2 RVSON SPACEYICTRL{SPACEI+SPACE)I 
9LSPACE RVSOFF SPACE} SPACEINEGATIVSCHRIFTSPAC 
EIEIN" 

&70 PRINT"(DOHN RVSON SPACEICTRLISPACEI+SPACEIO 
{SPACE RVSOFF, SPACE}: (SPACEINEGATIVSCHRIFTISPACE 
3AUS" 

&80 PRINT" {DAUN2}DURCH{SPACEIBETAETIGUNG{SPACEID 
ER{SPACEYENTSPRECHENDEN" 

&90 PRINT" (DOWNITASTELSPACEYERSCHEINT{SPACEIDAST 
SPACEIGEWUENSCHTESPACEIZEICHEN(SPACE DOHNIANLSR 
ACEIDER{SPACEICURSORPOSITION. " 

700 PRINT"{SPACES DOHNSYBITTELSPACEIDRUECKENTSPA 
CEISIETSPACE RVSON SPACEISTSPACEIPTSPACEIATSPACE 
IC{SPACEIETSPACE RVSOFF}" 

710 GETKEYA$s IFA$< >" SPACE} "THEN710 

720 POKE65298 ‚192: PDKE65299 ,56: KEY1 „CHR$(133) sKE 
Y2,CHR$ (137) :KEY3,CHR$ (134) 





























730 PRINT" CLEAR}" ıA=30723POKEA,160 

740 GETKEYA$ 

750 IFA$=" {UP} "ANDA>3111THENC=-40: GOSUBB00:G0T07 
40 

760 IFA$=" CDOWN} "ANDA<4032THENC=40: GDSUBR00: G0TO - 
740 

770 1FA$="tLEFT}"ANDA>S072THENC=-1:G0SUB8003G0T0 
740 

780 IFA$="{RIGHTI "ANDA<4071THENC=12:605UB800:60T0 
740 

770 6010830 

800 IFPEEK (A) >127THENPOKEA,PEEK (A) -128: ELSEPOKEA 
‚PEEK(A)+128 


810 A=A+Cs IFPEEK (A) >127THENPOKEA,PEEK (A)-128:1ELS 


:Sompute mib 


<151> 
<55> 
<178> 
<12> 
<148> 
<70> 
<138> 
<33> 
<175> 


<45> 
<82> 


<225> 
<214> 
<121> 


<133> 


<98> 


<172> 


<30> 


<188> 


<3> 


<187> 


<128> 


<67> 
<84> 


<231> 


<1> 


<172> 
<27> 
<59 
<170> 
<121> 
<66> 
<159> 
<204> 
<230> 
<a> 
<221> 


<4> 
<107> 


<89> 


tips & tricks 









































EPOKEA,PEEK (A) +128 <192> | SPACEITTSPACEITISPACEIOTSPACEIRTSPACESI" <85> 
820 RETURN <197> | 1280 PRINT" {DOWN23BITTEtSPACEIWAEHLENTSPACEISIEL 

830 IFA$=" CLEAR} " THEN73O <193> | SPACEIJETZTISPACEIS ISPACEIS $: 5#25}7" <116> 
840 IFA$=" (HOHE}I"THENC=- (A-3072) :60SUBB00: G0T074 1290 PRINT"{DOHNZ RVSON SPA SPACE}1{SPACE RVSOFF SPA 

o <106> EEZINEUCSRACEIDEF. (SPACE? ZEICHENSATZ CSPACEILOESC 

850 IFA$="(F1}"THEN1000 <109> | HEN” <115> 
860 IFAS="{F2}"THEN1330 <206> | 1300 PRINT" {DOUN4 RVSON SPACEIZLSPACE RVSOFE SPA 

870 IFA$="{F3}"THEN1450 <230> CE2INEU{SPACEIDEF. {SPACE} ZEICHENSATZ (SPACEIBEIBE 

880 AS=ASC (A$) s IFAS>GSANDAS<F6ETHENPO=AS-64: G0T09 HALTEN" <157> 
70 : <103> | 1310 GETKEYA$: IFA$<"1"ORAS>"2"THENI1Z1O <246> 
890 IFAS>1F1ANDAS<224THENPO=AS-128:60T0970 <52> 1320 ONVAL (A$)GOTO40,60 <199> 
900 IFAS>Z1ANDAS<SS4THENPO=AS: GOTOF7O <110> | 1330 IFPEEK (A) >127THENPOKEA,PEEK (A) -128:ELSEPOKE 

910 IFAS=255THENPO=94:60T0970 <232> | A,PEEK(A)+128 <109> 
920 IFAS>159ANDAS< 192THENPO=AS-64:GOT0970 <158> | 1340 ‚COLOR4 „83 FORI=0T0999: POKE15360+1 „PEEK (3072+ 

930 IFAS=1BTHENR=1:60T0740 <9B> I)zNEXT2COLOR4,1 <119> 
940 IFAS=146THENR=0:G0T0740 <253> | 1350 PRINT" HHITE CLEAR RVSON SPACETYS{SPACEICES 

950 IFAS=20ANDA>3072ANDPEEK (A)=160THENPOKEA,32:A PACEIR{SPACEYETSPACE YETSPACEINISPACEZIELSPACEIDE 
=A-1:POKEA, 160:60T0740 <199> | SPACEIITSPACEITISPACEIUTSPACEIRISPACEB" <146> 
960 GOTO740 <22> | 1360 INPUT! CDOHN2ISCREENNAME" N$: IFLEN (N$) <LORLE 

970 POKEA,PO+12B#R: A=A+1: IFA=4072THENA=3072 <61> | NN$) >J16THENPRINT" {YP43":GOTO1I40 <124> 
980 IFPEEK (A) >127THENPOKEA,PEEK (A) -128: ELSEPOKEA 1370 AA=3072:EA=4072: PRINT" {DOHN2 SPACEZ. RVYSONIP 

„PEEK (A) +128 <15> | LAY{RVSOFF SPACEI+TSPACE RVSONYRECORD{RVSOFE S SPA 

990 GOTO740 <52> | CEYDRUECKEN" <199> 
1000 IFPEEK (A) >127THENPOKEA ,PEEK (A) -128: ELSEPOKE 1380 IFPEEK (1)<>192THEN1380 <247> 
A,PEEK (A)+128 <33> | 1390 FORI=0T0999: POKE3072+1 ‚PEEK(15360+1) 3NEXT <133> 
1010 COLOR4 ‚8: FORI=0T0999: POKE15360+1 „PEEK (3072+ 1400 SYS43115 N$,1,1 <251> 
I) sNEXT=:COLOR4,1 <Aa3> 1410 Hi= =INT (AA/256) :POKE217, H1:L1=AA-256*H1: PDKE 

1020 POKE&5298, 196: POKE65299 ,208 <82> | 216,11 <253> 
1030 PRINT"{HHITE CLEAR RVSON SPACETYS{SPACEICKS 1420 H2=INT (EA/256) :POKE2036 „H2: L2=EA-256#H23 POK => 
PACEIRISPACEIETSPACEFETSPACEINESPACEZIETSPACEIDE E2035,L2 <225> 
SPACE>I{SPACEIT{SPACEIOLSPACEIRISPACER}" <101> | 1420 POKE2034 „216:5Y565494 <160> 
1040 PRINT" {DOHNZIAB{SPACEIWELCHERTSPACE}ZEILEIS 1440 POKE65298, 176: POKE65299 „208: GOT01190 <126> 
PACEYSOLLEN{SPACEIDIE{SPACE RVSON+HPRINT{RVSOFFY- 1450 GOSUB1440: 60101590 <204> 
ZEILEN" : INPUT" {DOHN3BEGINNEN" ;EZ <248> | 1460 IFPEEK (A) >127THENPOKEA ,PEEK (A) -128:ELSEPOKE 

1050 IFEZ<2000DREZ >&60000THEN1030 <209> | A,PEEK(A)+128 <239> 
1060 1=153640 <207> | 1470 OPEN4 ‚4: FORI=3072T040325TEP40 <49> 
1070 PRINT" {CLEAR} "EZ"PRINT"CHR$ (34) 3 <20> | 1480 PRINT#4 ,CHR$ (15) CHR$ (16) "20"; <143> 
1080 FORJ=ITOI+39:PO=PEEK (J) <115> | 1490 FORI=ITOI+39:FO=PEEK (J) <14> 
1090 IFPO>127ANDR=OTHENPRINTCHR$ (34) "CHR$ (18) "CH 1500 IFPO>127ANDR=OTHENPRINT#4 „CHR$ (18) 3 :R=1 <69> 
R$ (34) 3=:R=1 <46> | 1510 IFPO< 12BANDR=1THENR=0:PRINT#4 „CHR$ (146) 5 <212> 
1100 NG TEENS SEERDSEPEREEL SU) VEBERENE 1520 IFPO>127THENPO=PO-128 <11> 
&) "CHRE(Z4); <141> | 1530 IFPO<S2THENAS=PO+64: 60T01570 <162> 
1110 IFPO>127THENPO=PO-128 <112> | 1540 IFPO>31ANDPO<&4THENAS=PO:GDTO1570 <197> 


1120 IFPO<S2THENAS=PO+54:GOT01160 
1130 IFPO>S1LANDPO<64THENAS=PD: GOTO1160 
1140 IFPO>&3SANDPO<SFSTHENAS=PO+32:G0TO11&0 


<167> | 1550 IFPO>43ANDPO<F&THENAS=PO+32:G0T01570 <135> 
<186> | 1560 IFPO>9SANDPO< 12BTHENAS=PO+64 <76> 
<109> | 1570 PRINT#4 ,CHR$ (AS); :NEXT=:PRINT#4 ,CHR$(B) NEXT 
























































1150 IFPO>?75ANDPO< 12BTHENAS=PO+64 <176> | :PRINT#4,CHR$ (15) :2PRINT#45CLOSE4 <184> 
1160 PRINTCHR$ (AS) 3; :NEXT=PRINTCHR$ (34) ePRINT"EZ=. 1580 RETURN <192> 
"EZ": 1="1":60T01180" <15> | 1590 IFPEEK (A) >127THENPOKEA,PEEK (A) -128:ELSEPOKE 

1170 POKE239,3:POKE1319,19:POKE1320,13:POKE1321, A,PEEK(A)+128 <114> 
13:2END <60> | 1400 GDTO740 <153> 
1180 EZ=E7Z+1: I=1+40: IFI<=16320THEN1070 <182> | 1610 PRINT"{HHITE CLEAR RVSON SPACETYSTSPACEICS 

1190 PRINT"{HHITE CLEAR RVSON SPACETISTSPACEITTS PACEFRISPACEFETSPACEYEXSPACEIN{SPACEZIETSPACEIDE 
PACEIR{SPACEIETSPACEYETSPACEINLSPACE3FETSPACEIDE SPACEIITSPACEITISPACEIOTSPACEIRLSPACEB" <171> 
SPACE>ICSPACEITSPACEIOTSPACEIRLSPALEB" <5> 1620 PRINT"{DOHN4 SPACE2}SOLL{SPACEIDAS{SPACEIPR 

1200 PRINT" {DOHNZ2IBITTE{SPACEIWAEHLENTSPACEISIET OGRAMM{SPACEIGELOESCHT {SPACEIWERDENLSPACEI?" <241> 
SPACE JETZTLSPACE}: {SPACEIS Sx253" <S5> | 1630 PRINT"{DOHN SPACE16 RVSON SPACE} LFLASHONIJ 

1210 PRINT"{DOWN2 RVYSON SPACEYITSPACE RVSOFE. SPA tELASHOFF3 / {FLASHONFN{ELASHOFF}) CSPACE}" <84> 
CE2INEUER{SPACE}SCREEN" <95> | 1640 BETKEYA$: IFA$="N"THENI1680 <a2> 
1220 PRINT"{DOHN2 RVSON SPACEI2{SPACE RVSOFF SPA 1650 IFA$<>"J"THEN1640 <15> 
CE2}3SCREEN{SPACEFAUSDRUCKEN"  *44> | 1660 PRINT" {CLEAR}DELETE-16B0": PRINT" {DOWN2>PRIN 

1250 PRINT" {DOHN2 RVSAN SPACEIZS{SPACE RVSOFF SPA TCHR$S (147) :sEND" <207> 
. CE2}PROGRAMMENDE" <77? | 1670 POKE1319, 19: POKE1320,13:POKE1321 ‚13: POKE239 


1240 GETKEYA$: IFA$< "1"ORA$>"3" THEN1240 

1250 ONVAL (A$)GOT01270,1260, 1610 2 
1260 FORI=0T0999: POKEI+3072,PEEK{1+15360) 3NEXT:G 
OSUB1470:G0T01190 

1270 PRINT"{HHITE CLEAR RVSON SPACE7TYISTSPACEITTS 
PACEYRISPACEYETSPACEFELSPACEIN{SPACESFETSPACEIDT 


<240> | „Z:END <80> 
<255> 1680 PRINT" CLEAR} "SEND <214> 


ENDE DES LISTINGS 
<170> En 























sondern vor allem, weil das nach- 
geladene Programm sonst nicht 


Das Basic 3.5 kennt den Befehl 
”dload” sowohl im Commando-, 


»dload« 
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wie auch im Befehlsmodus. 

Im Befehlsmodus (also als Aufruf 
aus einem Programm heraus) hat 
dieser Befehl jedoch einen 
Haken: 

Das aufzurufende Programm 
muss kürzer sein, als das aufrufen- 
de Programm. Und zwar nicht 
nur, wie im Handbuch erwähnt, 
um die Variablen zu erhalten, 


vollständig geladen wird. 


Es gibt jedoch eine einfache Mög- 
lichkeit der Abhilfe, indem man 
den Computer den Commando- 
modus vorgaukelt. Dies geschieht 
mit Hilfe des Tastaturpuffers. Als 
kurze Erläuterung so- viel: Der 
Bildschirm wird gelöscht, damit 
eventuell vorhandene . Zeichen 
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nicht zur ERROR-Meldung füh- 


ren. Dann wird ”dload” und der 


Programmname mit einem Print- 
befehl auf den Bildschirm ge- 
schrieben. Die nachfolgende 
READY-Meldung des Belres 
führt dazu, daß der Cursor zwei 
Zeilen zu tief steht. Durch zwei- 
maligen Cursor-up-Befehl (chr$ 
(145)), wird der Cursor wieder 
in die richtige Zeile gebracht. 
Im Tastaturpuffer stehen nun 
RETURN” und anschließend 
»RUN” und ”RETURN”. Das 
heißt, Das Programm wird nach- 
geladen und gestartet, wie dies ei- 
gentlich mit dem schlichten ”dlo- 
ad” auch funktionieen sollte. Und 
nun das kurze Programm: 


10 
scnelr 
zo 
30 
40 
19) 


60 


as=' Frogrammmame?’ 
print’dlmad?’ 

print chr$(34);3a&;3 
peke 1319, 145 
poke 1320, 145 
poke 1321,13 

80 poke 1322,82 


709 


tips & tricks_ 


Dieses Utility - als Unterpro- 
gramm eingesetzt, ermöglicht 
zum Beispiel die Erstellung eines 
Diskettenmenüs: sämtliche ‚Pro- 
gramme einer Diskette werden 
von einem Menü aus nachge- 


30 pake 
100 pcke 
110 pake 
120 pake 





1323,85 
1324,78 


1325,13 


laden. 








Na endlich: 
Speichersplit 


auch für die 





64-K-Versionen 





Speichersplit für Plus/4 und 
C16 + 64 KByte 

Speichersplit teilt den Arbeits- 
speicher in zwei selbständige Be- 
reiche auf, in welche je ein Basic- 
programm geladen, und beide un- 
abhängig voneinander bearbeitet 
werden können. Mit Maschinen- 
Programmen ist Speichersplit nur 
dann kompatibel, wenn keine 
Überschneidungen vorkommen 
(vgl. Tabelle). 

So kann man beispielsweise, wäh- 
rend manim Bereich O0 ein Pro- 
gramm erstellt, ein zweites im Be- 
reich 1 bereithalten und Teile dar- 
aus mittels des Bildschirmeditors 
in den Bereich 0 übernehmen. 
Das spart Arbeit und Zeit. Oder 
man hält, während man im einen 
Bereich Vokabeln paukt, im an- 
deren ein kleines Spielchen bereit, 
um zur Entspannung hin und 
wieder mal umzuschalten. Dabei 
kann auch die hochauflösende 
Grafik uneingeschränkt benutzt 
werden. 

Das Hin- und Herschalten zwi- 
schen den beiden Speicher 


blöcken geschieht mittels der 
Funktionstate F8. (HELP). 
Nach jedem HELP Tastendruck 
meldet der Computer in welchem 
Bereich man sich nun befindet 
und wieviele Bytes hier noch frei 
sind. Alle Basickommandos 
(RUN, LIST, SAVE, LOAD, 
NEW etc.) beziehen sich aus- 
schließlich auf den aktuellen Be- 
reich. 

Als zusätzliche "Hilfe sind die 
Funktionstasten Fi und F2 mit 
der Funktion OLD für die Berei- 
che 0 bzw. 1 belegt. Damit kann 
ein versehentlich gegebenes 
NEW wieder rückgängig ge- 
macht werden. 

Taste F6 führt einen RESET 
durch. z i 


‚Nach dem Eintippen des Basicloa- 


\ ders ist es ganz wichtig diesen zu- 


LET 


. erst abzuspeichern, denn er löscht 
“ sich selbst, nachdem das Maschi- 


" nenprogramm generiert worden 


ist. 


' REM?’s können selbstverständlich 
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weggelassen werden. 


Erz 


C-16 LISTING + CHECKSUMMEN (GC V1.0) 


10 REM #*#* (C) BERNHARD LAUER, 1986 ###* <15> 
20 : <78> 
30 POKE216,0 : REM BEREICHSZEIGER DB <247> 
nr ee <98> 
50 REM GRAFIKBEREICH RESERVIEREN <125> 
60 GRAPHIC 1 :GRAPHIC 0 . <146> 
70 : <128> 
80 REM PLATZ SCHAFFEN <165> 
90 KEY3„"DILSRY"+CHRS(IZISKEY A,""sKEV 5,"" <183> 
100 : <158> 
110 REM FUNKTIONSTASTENBELEGUNG <19> 
120 : <178> 
130 REM OLD FUER SPEICHERBER.1 = Fi <113> 
140 KEVY1,"P{S0}16386,1:5{SY334840:515Y}34892"+CH 

R$ (13) 4 <189> 
150 : <208> 
160 REM OLD FUER SPEICHERBER.2 = F2 <188> 
170 KEY2,"P1S0345058,1:518Y}34840:5{SY334892"+CH 

R$(13) : <199> 
180 : <238> 
190 REM RESET = F6 <30> 
200 KEY&,"S{SY}32793"+CHR$ (13) <b> 
210 ® <12> 
220 REM UMSCHALTEN ZWISCHEN DEN SPEICHER BERE 

ICHEN = F8 (HELP) <39> 
230 KEY 8,"S{SYI1630:CtSL}:PLSQI194,13?PISE)} (216 

I ,FISRI (X) "+CHRS (13) <51> 
240 : <42> 
250 REM SPEICHERGRENZE BEREICH 0 SETZEN <225> 
260 POKES2,175:POKES4,175:POKES6,175 <106> 
270 2 <73> 
280 REM ANFANGSWERTE FUER ZEIGERSPEICHERSSS s <151> 
290 FOR 1=0T013 <203> 
300 READ A$ <162> 
310 POKE 1694+1,DEC(A$) <142> 
320 NEXT I ' <85> 
330 2 <133> 
340 REM NULLBYTES AM BEGINN DER BEREICHE <253> 
350 POKE 45056,0:POKE16384,0 <244> 
340 FOR I=1 TO 10 sPOKE 45056+1,0:NEXT <155> 
370 : <173> 
380 REM MASCHINENPROGRAMM : <46> 
390 FOR I=1630 TO 1669 :READ AsPOKE 1,A:5=8+A:NE 

xT <111> 
400 IF 5<>5431 THEN PRINT"FEHLER{SPACEYIIN{SPACEI 
DATAS!sEND <200> 
410 NEW <61> 
420 i <223> 
430 DATA 01,B0,03,B0,03,B0,03 <26> 
440 DATA BO,FF,FC,FD,FC,FF,FC <53> 
450 ® - <253> 
460 DATA162,014,181,043,157,174,006,202 <153> 
470 DATA208,248,162,014,189,158,006,149 <150> 
480 DATA043,202,208,248,234,162,014,189 <22> 
490 DATA174,006,157,158,006,202,208,247 <167> 
500 DATA165,216,073,001,133,216,096,000 <77> 


ENDE DES LISTINGS 
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Wer hat sich nicht schon mal die 
mangelnde Geschwindigkeit der 
C-16’er Datasette geärgert? 


Turbo-Tape schafft hier Abhilfe! 


Turbo-Tape speichert Program- 
me nicht nur wesentlich schneller. 
ab, es ermöglicht im Gegensatz zu 
anderen Schnelladeprogrammen 
auch das Laden in den ”kalten” 
Rechner, also ohne Turbo-Tape. 


Weiterhin ist eine Autostartrouti- 
ne eingebaut, die es auf Wunsch 
ermöglicht, Programme nach 
dem Laden sofort automatich zu 
starten. 


Nach dem Laden und Starten von 
TURBO-TAPE erscheint auf 
dem Bildschirm ein Titelbild, in 
dem unter anderem der noch ver- 
bleibende Speicherplatz angezeigt 
wird. Da TURBO-TAPE die er- 
sten 1228 Bytes des Basicbereichs 
belegt, ist es auch in der 16K- 
Version weiterhin möglich, hoch- 
auflösende Grafik uneinge- 
schränkt zu benutzen. 


Die Steuerung erfolgt über 3 Be- 
fehle: 


Turbo- 


>SAVE 
>LOAD 
>VERIFY. 


Abspeichern: 

>SAVE speichert das Programm 
im Basic-Speicher in TURBO- 
TAPE-Geschwindigkeit ab. Wird 
hinter dem Befehl ein File-Name 
in Anführungszeichen oder in ei- 
ner Stringvariablen geschrieben, 
so wird das Programm unter die- 
sem Namen abgespeichert. Es 
werden dabei nur die ersten 17 
Zeichen benutzt, der Rest wird 
Yabgeschnitten”. 


Nachdem der Befehl abgeschickt 
wurde, erscheint auf dem Bild- 
schirm der Text ”turbo-saving” 
und die Aufforderung ”press play 
& record on tape”. Sobald man 
die Recordtaste an der Datasette 
drückt, wird der Bildschirm leer 
und der Recorder läuft an. Nach 
wenigen Sekunden erscheinen 
schwarze Balken auf dem Bild- 
schirm. Dies ist ein Zeichen da- 
für, daß TURBO-TAPE aktiv ist. 


Nachdem das Programm : abge- 


speichert ist, erscheint eine 


READY-Meldung. 


Compuhe mib 






Abgespeicherte 
solltn immer mit >VERIFY 
überprüft werden: 

>VERIFY überprüft byteweise 
das im Speicher befindliche Pro- 
gramm mit dem auf der Kassette. 


Programme 


Dies geschieht ähnlich der 
VERIFY-Routine des Betriebssy- 
stems. Daher ist es auch möglich, 
über die >VERIFY-Routine das 
Ende eines Programmes auf Kas- 
sette zu finden. Dadurch kann 
man Programme direkt hinterein- 
ander ohne die Gefahr eines 
Überschreibens abspeichern. 
(Achtung: bei einem TURBO- 
Programm funktioniert dies nur 
mit >VERIFY, während ein nor- 
mal abgespeichertes Programm 
auch mit dem neuen Befehl über- 
prüft werden kann.) 

Parameter hinter VERIFY wer- 
den ignoriert. 


Die >VERIFY-Funktion kann 3 


verschiedene Meldungen aus- 

geben: 

1. FILE OK. 

“ Das Programm auf Kassette ist 
korrekt abgespeichert und 


identisch mit im dem Speicher. 


2. ?VORSPANN: 

VERIFY ERROR 

Der Programmvorspann, der 
in normaler Form abgespei- 
chert wurde, ist fehlerhaft. 
Dies weist auf schwere Über- 
tragungsfehler hin. Dieser Feh- 
ler tritt auch auf, wenn ein 
Turbo-Tape-fremdes File 
vorlag. 


w 


. PVERIFY ERROR 
Das Programm in TURBO- 
TAPE-Geschwindigkeit ist 
entweder nicht mit dem im 
Speicher identisch oder es wur- 
de fehlerhaft übertragen. 


LADEN: 

>LOAD entspricht dem norma- 
len LOAD-Befehl. Es wird hier 
lediglich das erste Zeichen 
(”>”)ignoriert. Dieser Befehl 
wurde nur der vollständigkit hal- 
ber eingebaut. 

Um Programme in TURBO- 
TAPE-Geschwindigkeit zu laden, 
ist- das TURBOßTAPE-Pro- 
gramm selbst nicht notwendig. 
Daher kann man solche Pro- 
gramme auch in den ”kalten” 
Computer laden, das heißt: direkt 
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nach dem Einschalten. Dazu muß 
man nur LOAD eingeben. Wenn 
beim Laden ein Fehler auftritt, 
wird eine 

LOAD ERROR - Meldung ausge- 
geben. 


Autostart: 
Eine der wesentlichen Vorteile 
_ von TURBO-TAPE € 16 liegt in 
der Fähigkeit zum Autostart. 
Soll das Basicprogramm nach 
dem Laden direkt gestartet wer- 
den, so muß man beim Abspei- 
chern einen Stern (*) als erstes 
Zeichen in den Filenamen setzen. 
Nach dem Laden wird dann das 
Programm direkt durch RUN ge- 
startet. 


BREAK-Möglichkeiten: 

Es gibt verschiedene Möglichkei- 
ten, ein Programm anzuhalten. 
Zunächst ist es jederzeit möglich 
die RESET-Tast bei gedrückter 
RUN-STOP-Taste in den Moni- 
tor zu gelangen. Ansonsten kann 
man noch bei gedrückter RUN- 
STOP-Taste die STOP-Taste der 
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C-16 LISTING + CHEGESUMMEN 











Datasette betätigen, was aller- 
dings bei >SAVE nicht funktio- 
niert, solange die schwarzen Bal- 
ken zu sehen sind. 


Störungen: = 

Trotz der hohen Übertragungsge- 
schwindigkeit (TURBO-TAPE: 
1500 Baud, normal 250 Baud) 
konnte eine sehr hohe Sicherheit 
erreicht werden. Dennoch sollten 
einige Regeln beachtet werden: 


- Es sollten nur qualitativ hoch- 
wertige Normalkassetten (kei- 
ne Chromdioxid) verwendet 
werden. 

- Um Störungen zu vermeiden, 
sollte der Abstand der Dataset- 
te zu. Computer, Fernseher 
und Netzgeräten mindestens 
ein Meter betragen. 

-. Der Tonkopf sollte regelmäßig 
gereinigt werden. 


Sollten dennoch Störungen auf- 


treten, so kann diesan der Magne- 
tisierung des Tonkopfes, an einer 


(DE Vv1.0) 

















OO REN SB RIIIR £3> 

1 REM #** “RR «2543 
2ZREM ## TURRBRO-TAPE C1i6 #** <239> 
3 REM #** “r# <Q> 

4 REM ##% (C) 1986 FROG-SOFTWARE RK <124> 
5 REM ##%* #rr <27 

& REM #r* MADE BY JOACHIM THEES “er «227> 
7 REM *%** GUTENTHAL. 32R Hr <159> 
8.REM #** 5552  MORBACH ar“ «81> 
9 REM HB EINER <12> 
10 3 x68> 
20 FRINTCHRE (27) +"N" z <76> 
30 IF FEEK(44)=32 THEN 130 N <28> 
40 2 “98> 
50 REM FOKES VERGESSEN ! <105> 
60 PRINT"?FEHLER: FOKESTSPACEFNICHT{SPACEIEINGEGE 
BEN{SPACEY!" <54> 
70 PRINT: PRINT" {SPACES}GEBEN{SPACEISIETSPACEIFOL 

GENDE {SPACEFPOKES{SPACEIEIN" <21> 
80 FRINT:FRINT"{SPACESIUND{SPACEILADENTSPACE}SIE 
-£SPACEIDAS{SPACEFPROGRAMMISPACE}NEU." <197> 
90 PRINT <243> 
100 PRINT" {SPACEYFOKE{SPACEY43,1:FOKEISPACEY44 ,3 
2:POKE{SPACEYB192,0:NEW" SPRINT “104> 
110 STOP <254> 
120 : <178> 
130 REM POKES OK. x32> 
140 PRINT"{SPACE RIGHT SPACE4YTISPACEYUTSPACEIRE 
SPACE+FB{SPACEIOXSPACEYI-{SPACEITISPACEIALSPACEIPE 
SPACEYEX{SPACE2YVISPACEI2.O" <16> 
150 FRINT"£{SPACE RIGHT SPACE4 CY263" <198> 
160 PRINT" {DOHN2YBITTE{SPACEFWARTEN{SPACEIDATAST 
SPACE}WERDEN{SPACE}IGELESEN. ":PRINT <65> 
170 : - <228> 
180 FORBL=O0T015 <44> 
190 PRINT"BLOCKISPACEY#"; BL; <1> 
200 SU=0:LE=79: IFRL.=1STHENLE=3I <209> 
zı0 FOREB=OTOLE — <105> 
220 READ BY:PA=4096+EL+80+BB: SU=SU+RY <25> 
230 FOKE FA,BY <240> 
240 NEXT BB <188> 
250 READ SS «327 
260 IF 55=SU THEN 300 <77> 
270 REM FEHLER <1135> 
280 FRINT".. „FEHLER{SPACE}! "SPRINT <200> 
290 STOF <179> 


schlechten Justierung oder 


schlechten Erdung liegen. 


Tips zum Eingeben: 

Bevor man mit dem Eintippen be- 
ginnt, muß man folgende Zeile 
im Direktmodus eingeben: 
POKE 43,1 : POKE 819,0 : 
NEW 


Danach kann das Programm ab- 
getippt und gespeichert werden. 
Beim Starten werden die Datazei- 
len gelesen und geprüft. Sollten 
Fehler gefunden werden, so wer- 
den sie angezeigt. Wenn all Data- 
zeilen korrekt waren, gibt das 
Programm die Meldung ”DA- 
TAS OK” aus und setzt die Basic- 
zeiger auf das neue Programm. 
Listet man jetzt, sieht man folgen- 
des kleine Basicprogramm: 

1986 SYS 4128:REM TURBO- 
TAPE 


Man kann es nun über SAVE ab- 
speichern. Wenn man zum Ab- 
speichern die F1-Taste benutzt, 
wird das Programm automatisch 
in TURBO-TAPE-Form abge- 








programme 


speichert und mit einer Auto- 
startroutine versehen. . 
Es muß dann nur noch LOAD 
eingegeben werden, um das Pro- 
gramm zu laden und zu starten. 
Nach dem Abspeichern sollte un- 
bedint RUN ‚eingegeben 
werden. 

Wurde das TURBO durch ein 
RESET gelöscht, kann es durch 
SYS 4128 reaktiviert werden. 


Arbeitsweise: 

Turbotape belegt den Anfang des 
Basicspeichers. der Basicanfang 
wurde entsprechend verschoben. 
Zum Abspeichern wird eine La- 
deroutine in Eingabepuffer, Stack 
und Programmname gelegt und 
abgespeichert. Der Programmtext 
wird dann in einem 3-Ton Ver- 
fahren bitweise abgespeichert, 
mit einem Prüfbit pro Byte und 
einer 16-Bit Prüfsumme am Ende. 


Übertragungszeiten: 
Länge normal TURBO 
12K2 6505 7.1415 
50K 27’00 428 
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300 PRINT"ASPACE>OK." <31> 
310 NEXT BL <33> 
320 PRINT" {DOHN2YDATASTSPACE}OK." <9> 
330 A$="RUN"+EHRS$ (13) +"POKE43, 1:POKE44,16:POKE4S 

‚205: FOKE46 ,20"+CHR$ (13) 2191> 
340 A&=A$+" >SAVE"+CHR$ (34) +"#TURBO-TAFE {SPACE}YV2. 
„A"+CHR$(1I) <172> 
359 KEY1,A$ <246> 
360 PRINT: FRINT"PROGRAMM{SPACEFFERTIG. {SPACEFABS 
PEICHERN{SPACE}UEBER" <84> 
370 PRINT:PRINT" SPACE RVSONFSAVE{RVSOFF SPACE}O 
DER{SPACE RVSON SPACE>YFIXSPACE RVSOFF}!" <25> 
380 PRINT=:PRINT 3 <85> 
390 POKE43,1:POKE44, 16:POKE45, 205: POKE46, 20: CLR: 

END ; <252> 
400 = Dakd <203> 
1000 : «37> 
1010 REM PROGRAMM-BLOCK # O <35> 
1020 DATA 0, 24, 16,194, 7,158, 52, 49 <63> 
1030 DATA 50, 56, 59,143, 32, 84, 85, B2 <27> 
1040 DATA &6, 79, 45, 84, 65, 80, 69, O0 <99> 
1050:-DATA - :.0,.20, 0, -0,.0,0.042:0,::0 <245> 
1060 DATA 76,101, 17, 68, 65, 84, 65, 71 <69> 
1070 DATA 69, 78, 43, 83, 85, 77, 32, 32 <21> 
1080 DATA 32, 32,32, 32, 32,:.32,.100,227 <68> 
1090 DATA : 32,141,227,162, 0,134,212,134 <161> 
1100 DATA 215,166, 43,164, 44,134,208,132 <86> 
1110 DATA 209, 32, 56, 2, 32, 56, 2,176 <186> 
1120 DATA 5854 <209> 
1130 3 <168> 
1140 REM PROGRAMM-BLOCK # 1 . : <1893> 
1150 DATA .-3, 32, 31, 2, 32, 56, 2,176 <142> 
1160 DATA 251, 32, 55, 2, 32, 8, 2,160 <92> 
1170 DATA - 0,145,208, 24,101,212,133,212 <129> 
1180 DATA 144,  2,230,213,230,208,208, 2 <110> 
1190 DATA 230,209, 32, 53, 2,144,229, 32 <193> 
1200 DATA 8, 2, 69,212,208, 34, 32, 8 <75> 
1210 DATA 2, 69,213,208, 27, 32, 8, 2 <25> 
1220 DATA 162, 0,200,208,253,232,208,250 <90> 
1230 DATA 165, 1, 9, 8,1335, 1, 56,110 <191> 
1240 DATA 252, 7, 32,120,227, 76.188, 3 <143> 
1250 DATA 8112 <a2> 
1260 : <42> 
1270 REM PROGRAMM-BLOCK # 2 <74> 
1280 DATA 32,120,227,162, 29, 76,131,134 <116> 
1290 DATA 162,248,154,169,139, 72,169,219 <89> 
1300 DATA 72,162, 5, 36,129, 48, 18,173 <23> 
1310 DATA 55, 3,201, 42,208, 11,134,239 <72> 
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1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 
1400 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
1590 
1600 
1610 
1620 
1630 
1640 
1650 
1660 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 

_1800 
1810 
1820 
1830 
1840 
1850 

‚1860 
1870 
1880 
1890 
1900 
1910 
1920 
1930 
1940 
1950 
1960 
1970 
1980 
1990 
2000 
2010 
2020 
2030 
2040 
2050 
2060 
2070 
2080 
2090 
2100 
2110 
2120 
2130 
2140 
2150 
21&0 
2170 
2180 


DATA 189,227, 
DATA 247,166,208,164,209, 76, 48,168 
DATA 682, 85, 78, 
DATA 234,234, 76, 
DATA 216, 72,173, 
DATA 25,255, 32, 


DATA 
2 


9893 


3,157, 38, 


58, 
75, 


5,202,208 


13,234 ,254,234 


3,162, 


8,134 


25,255, 73,127,141 
2,104,105,198 


53, 


REM PROGRAMM-BLOCK # 3 
216,208,238, 96,169, 16, 36, 
208,252,160,255, 36, 
2,255,140, 
255, 96, 32, 31, 
202,134, 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
: 5 


REM PROGRAMM-BLOCK # 4 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


DATA 
DATA 
. 


174, 


240, 


3,173, 


131,134, 32, 
162,255,134, 58, 32, 90,136,134 
59,132, 60, 
239,176, 


8917 


3 


137, 32,121, 
76, 40,135, 32,115, 
240,246,201,148,208, 
18,201,149,208, 
162, 11, 76,131,134,162,205,160 
20,134, 43,132, 44, 32,123,138 
162, 40,160, 


3 


8899 


S1, 


2, 


1 


1,240,252 
2,255,140, 


82.2312 


16,253, 41, 
8, 32,120,227,162, 30, 
2,228, 3, 


32,115, 


3 
2 
4 
76 
96 


4,170,240 
76, 46,135, 32, 83 


4.201,177,240, 


3, 76,130, 197 


17,142, 


REM PROGRAMM-BLOCK # 5 
73, 67, 32, 84, 85, 82, 66, 
45, 84, 65, 80, 69, 32, 86, 
46, 48, 32, 32, 

229, 43,170,165, 56,229, 44, 
95,164, 32, 79,255, 32, 66, 
84, 69, 83, 32, 70, 82, 69, 

0,177,214,240, 12, 

DATA 210,255,230,214,208,243,230,215 

3,128, 13, 

i3, 32, 32, 65; 76,76, 32 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


DATA 
DATA 
DATA 
® 


0,160, 


76,193, 


13, 
7349 


17, 


76, 


3 


4,201,147 
3, 76,140 


2, 3,140 
3,162,214,160, 17,134,214 
DATA 132,215, 32,129,255, 32,132,255 
32, 79,255, 17, 84, 82, 79, 78 


0,165, 55, 


REM PROGRAMM-BLOCK # 6 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
® 


86, 
32, 
75, 
54, 
13, 
32, 
56, 
83, 
13, 
32, 

4172 


69, 
49, 
66, 
47, 
13, 
32, 
54, 
79, 
135 
32, 


82, 
54, 
32, 
49, 
32, 
32; 
32 
70, 
22, 
32, 


83, 
46, 
79, 
49, 
32, 
40, 
70, 
84, 
32, 


‚775 


73% 
46, 
78, 
54, 
32, 
67, 
82, 
87, 
32, 
65, 


REM PROGRAMM-BLOCK # 7 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
8 


66, 
73, 
13, 
58, 
32, 
146, 
46, 
a2 
73, 
32, 


89, 
77, 
13, 
32; 
18, 
32; 
46, 
32, 
70, 
32, 


4224 , 


32; 
32, 
13, 
62, 
34, 
79, 
46, 
32, 
89, 
32; 


74; 
84, 
32, 
83, 
42, 
82, 
34, 
32, 
13, 
62, 


79, 
72; 
32, 
65; 


46, 


32, 
13, 
62, 
32, 
76, 


REM PROGRAMM-BLOCK # 8 

32, 40, 61, 32,76; 
0,162, 
0,133,214, 32,115, 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
2 


Al, 


32, 72,156,201, 18,144, 


13, 


13, 


17,133,214,160, 
32,176, 
208,243,192, 


9 


153, 
255, 

65, 
7564 


35, 


4,153, 35, 


77, 78, 
54, 52, 
32,67, 
47, 43, 
32,:32, 
41, 49, 
79, 71, 
65, 82, 
32,32; 
&8, 69, 


65, 67, 
69, 69, 
85; 93, 
B6, 69, 
46, 46, 
18, 34, 
32,232, 
86, 69, 
32,32, 
79, 65, 


79, 65, 


77 
5o 
56 
32 
87 
67 
32 


13 


83 
32 
49 
52 
32 
37 
45 
67 
32 
32 


72 
83 
67 
32 
34 
46 
32 
82 
32 
68 


&8 


72,154,169 


4,240, 


11 


2,169 


0,196,214,176 


17,176, 
16,200,208,244, 32, 
84, 85, 82, 66, 79, 45, 
85,:73,-78; 71, 


REM PROGRAMM-BLOCK # 9 


8,169, 


13, 0, 


16,200 


32 
77 
83 
32 


<158> 
<124> 
<2> 
<152> 
<235> 
<2453> 
<233> 
<173> 
<222> 
<140> 
<97> 
<211> 
<23> 
<63> 
<236> 
<219> 
<103> 
<69> 
<1535> 
<93> 
<47> 
<113> 
<124> 
<197> 
<90> 
<164> 
<175> 
<155> 
<19> 
<34> 
<139> 
<153> 
<10> 
<178> 
<5> 
<154> 
<140> 
<44> 
<229> 
<137> 
<142> 
<222> 
<91> 
<180> 
<147> 
<103> 
<52> 
<152> 
<86> 
<136> 
<252> 
<39> 
<93> 
<32\ 
<82> 
<115> 
<133> 
<193> 
<199> 
<183> 
<44> 
<96> 
<149> 
<181> 
<14> 
<B86> 
<91> 
<90> 
<11> 
<124> 
<189> 
<66> 
<57> 
<192> 
<205> 
<161> 
<224> 
<200> 
<223> 
<191> 
<335> 
<135> 
<54> 
<168> 
<228> 
<188> 
<83> 


Compube mib 


2190 
2200 
2210 
2220 
2230 
2240 
2250 
2260 
2270 
2280 
2290 
2300 
2310 
2320 
2330 
2340 
2350 
2360 
2370 
2380 
2390 
2400 
2410 
2420 
2430 
2440 
2450 
2460 
2470 
2480 
2490 
2500 
2510 
2520 
2530 
2540 
2550 
2560 
2570 
2580 
2590 
2600 
2610 
2620 
2630 
2640 
2650 
2660 
2670 
2680 
2690 
2700 
2710 
2720 
2730 
2740 
2750 
2760 
2770 
2780 
2790 
2800 
2810 
2820 
2830 
2840 
2850 
2860 
2870 
2880 
2890 
2900 
2910 
2920 
2930 
2940 
2950 
2960 
2970 
2980 
2990 
3000 
3010 


DATA 69, 20,162, 80,160, 1,134,178 
DATA 132,179,162, 84,160, 2,134,157 
DATA 132,158,169, 0,133,154,162, 35 
DATA 160, 16,1354,175,132,176,169,179 
DATA 133,171, 32, 52,242,144, 5,162 
DATA 30, 76,131,134, 32,100,227,165 
DATA 1, 41,245,135, 1,162, 0,134 
DATA 212,134,213, 56, 8, 40,181, 43 
DATA 149,208,245, 45,149,210, 8,232 
DATA 224, 2,208,241, 40,169,208,141 
DATA 9817 

REM PROGRAMM-BLOCK # 10 

DATA 223, 7,160, B,132,215, 32,148 
DATA 20,198,214,208,249,198,215,208 
DATA 245, 32,133, 20, 32,128, 20, 32 
DATA 217, 7, 24, 72,101,212,133,212 
DATA 144, 2,230,213,104, 32,103, 20 
DATA 230,208,208, 2,230,209,230,210 
DATA 208,226,230,211,208,222, 32,143 
DATA 20,165,212, 32,103, 20,165,213 
DATA 32,103, 20,160, 8,132,215, 32 
DATA 143, 20,178,214,208,249,198,215 
DATA 10987 

REM PROGRAMM-BLOCK # 11 

DATA 208,245,165, 1, 9, 8,133, 1 
DATA 56,110,252, 7, 32,120,227, 76 
DATA 3,128,162, 72,154, 32, 69, 20 
DATA 169, 0,133,171,169, 1, 32, 74 
DATA 240, 8,162, 3,189,182, 19,221 
DATA 51, 3,208, 6,202, 16,245, 40 
DATA 144, 24, 32, 79,255, 13, 63, 86 
DATA 79, 82, 83, 80, 65, 78, 78, 58 
DATA 0,162, 28, 76,131,134, 80, 1 
DATA 84, 2, 32,100,227, 32,141 ,227 
DATA 7590 


REM PROGRAMM-BLOCK # 12 

DATA 162, 0,134,212,134,213,202,134 
DATA 2,166, 43,164, 44,134,208,132 
DATA 209, 32, 56, 2, 32, 56, 2,176 
DATA 3, 32, 31, 2, 32, 56, 2,176 
DATA 251, 32, 53, 2, 32, 8, 2,160 
DATA 0,209,208,240, 2, 6, 2, 24 


"DATA 101,212,153,212,144, 2,230,213 


DATA 230,208,208, 2,230,209, 32, 53 
DATA 2.144,225, 32, 8, 2, 69,212 
DATA 240, 2, 6, 2, 32, 8, 2, 69 
DATA 7688 


REM PROGRAMM-BLOCK # 13 
DATA-213,240, 2, 6, 2, 32,8, 2 
DATA 162, 0,200,208,253,232,208,250 
DATA 165, 1, 9, 8,133, 1, 56,110 
DATA 252, 7, 32,120,227,230, 2,208 
DATA- 17, 32, 79,255, 13, 70, 73, 76 
DATA 69, 32, 79, 75, 46, 13, 0, 76 
DATA 3,128, 76,177, 19,162, 80,169 
DATA 2,157, 0, 1,232,208,250,160 
DATA 0,185,213, 16,153, O0, 2,200 
DATA 192, 83,208,245,169,192,133,154 
DATA 8553 


REM PROGRAMM-BLOCK # 14 
DATA 169, 1,133,174,133,173, 96,162 
DATA 8,134,216, 74, 72, 32,126, 20 
DATA 173, 25,255, 73,127,141, 25,255 
DATA 104,198,216,208,238, 96,176, 15 
DATA 162, 74, 32,155, 20,162, 56, 32 
DATA 155, 20,162, 94, 76,155, 20,162 
DATA 74, 32,155, 20,162, 94, 32,155 
DATA 20,162, 56,160, 0,169, 16,141 
DATA 9,255, 44, 9,255,240,251,142 
DATA 2,255,140, 3,255,165, 1, 41 
DATA 9100 


REM PROGRAMM-BLOCK # 15 

DATA 253,133, 1,169, 16,141, 9,255 
DATA 44, 9,255,240,251,142, 2,255 
DATA 140, 3,255,165, 1, 9, 2,133 
DATA 1, 96, 0, 0, 0, 0, 0, 0 
DATA 2980 


ENDE DES LISTINGS 


<o> 
<69> 
<26> 
<232> 
<28> 
<186> 
<230> 
<3> 
<82> 
<57> 
<110> 
<62> 
<174> 
<97> 
<180> 
<73> 
<175> 
<10> 
<12> 
<114> 
<154> 
<204> 
<32> 
<56> 
<193> 
<66> 
<113> 
<255>._ 
<215> 
<229> 
<114> 
<91> 
<227> 
<37> . 
<124> 
<182> 
<99> 
<68> 
<215> 
<246> 
<201>- 
<146> 
<72> 
<22> 
<21> 
<216> 
<158> 
<146> 
<73> 
<13> 
<198> 
<107> 


- <158> 


<60> 
<161> 
<b6b> 
<173> 
<206> 
<158> 
<76> 
<124> 
<18> 
<105> 
<73> 
<o> 
<73> 
<202> 
<234> 
<251> 
<94> 
<53> 
<216> 
<126> 
<169> 
<5> 
<191> 
<203> 
<148> 
<100> 
<185> 
<124> 
<246> 
<47> 
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programme 








Schnell 


eingetippt — 
toller Spaß 





Bei diesem Spiel sind Sie in ein La- 
byrinth eingeschlossen und müs- 
sen innerhalb von 30 Minuten 
den Ausgang finden. 

Diese Zeitvorgabe sieht sehr groß 
aus, ist aber gerechtfertigt. Der 
Spieler ist in einem Raum des La- 
byrinths und kann durch Türen 
in den Nächsten gelangen. Der 


C-16 LISTING + CHECKSUMMEN (OC V1.0) 


RIESEN-LABYRINTH 


Überblick ist also stark einge- 
schränkt. Eine Aufsicht von 
oben, um sich zu orientieren, ist 
nicht möglich. Es empfiehlt sich 
daher, während des Spielens einen 
Lageplan anzulegen, um den 


° Überblick nicht völlig zu verlie- 


ren. Sie können sich freuen, wenn 
Sie mit Hilfe dieser ”Landkarte” 








beim dritten Anlauf zum das Ziel 
gefunden haben. Die Bewegung 
von einem Raum zum anderen er- 
folgt durch die Tasten N-orden, 
O-sten, S-üden und W-esten. Be- 
reits betretene Räume werden 
markiert, der Rahmen erscheint 
dann Rot, im Gegensatz zu Blau 
bei ”Neuentdeckungen”. 

Wollen Sie das Spiel vorzeitig ab- 
brechen, so haben Sie die Mög- 
lichkeit, den aktuellen Spielstand 
auf Kassette abzuspeichern, um 
ihn bei einem späteren Spiel wie- 
der zu laden. Die dadurch vergan- 
gene Spielzeit wird jeweils be- 
rücksichtigt, da die Datasette ja 
nicht gerade der schnellste Mas- 
senspeicher ist. 

Die Spielfläche besteht aus einem 
Quadrat von 20 x 20 Räumen. 
Die Aufgabe besteht darin, vom 
Raum 0/0 zum Raum 19/19 zu 
gelangen, also im Endeffekt die 
Fläche diagonal in Nord-Ost- 
Richtung zu überqueren. In der 
Praxis wird der Weg, wie zu ver- 
muten ist, kreuz und quer ver- 
laufen. 

Die Zu- und Ausgänge der 400 
Räume sind im Programm in 
DATA-Zeilen ER Wie 
man sich denken kann, führt ein 
Fehler beim Abtippen dieser Zei- 
len zu einer erheblichen Verände- 
rung des Labyrinths, das. dann 
vielleicht gar nicht mehr lösbar 
ist. Aus diesem Grunde werden 
die DATA-Zeilen per Prüfsum- 
me gecheckt, bevor das Pro- 
gramm startet. Die kleine Verzö- 
gerung beim Einlesen sichert die 
Richtigkeit des ganzen Spiels. 


140 CHAR1,25,12,"{RVSON SPACEYILISPACE RVSOFF SPA 

















CEI=TSPACEIALTES" <233> 
10 REM HH <85> 150 CHAR1,25,13,"SPIEL{ISPACEILADEN" <i64> 
20 REM * E3 <117> 160 CHAR1,25,15,"{RVSQON SPACEI+LSPACE RVSOFF SPA 
30 REM # RIESEN-LABYRINTH # <19> CEI=TSPACEISTART" <4> 
40 REM # * <137> 170 GETKEYA$ <144> 
50 REM # DANIEL SCHIEMANN #* <249> 180 IFA$="L"THENGOSUB1280 <162> 
&0 REM * NEUSTADT * <134> 190 IFA$="+"THEN210 <141> 
70 REM # * <167> 200 G0TO1i70 <24> 
80 REM BHHBHHBIERBHRIHAIN <155> | 210 CHAR1,25,20,"BITTE{SPACEIWARTEN" <194> 
90 REM <233> 220 FORI=0T017 <174> 
100 REM INITIALISIERUNG <20> 230 FORJ=OT0197 <186> 
110 DIML$(19,19) ,L7(19,19 <251> 240 READL$(J,D <220> 
120 EOLORO,8:COLOR4A „A: X=0: Y=0: T$="000000" <24> 250 FORK=1T04 <87> 
130 G605UB1040 <193> 260 S=S5+ASC (MID$S(L$(I,I) ,K,1)) <223> 


Compute mit — Sonderheft — 1/87 Compubhe nie 


programme 


270 NEXTK 

280 NEXTJECHAR1 ,25,22,5TR$(19-I)+"{SPACEY" 

"290 NEXTI 

300 TI$=T$ 

310 IFS<>54011THENPRINT"{CLEAR ELASHON>DATA-FEHL 
ER":STOP 

320 REM HAUPTSCHLEIFE 

330 GOSUB1040: Zz$="" 

340 IFL%(X,V)=1THENCOLOR4 ,3:ELSECOLOR4,7 

350 CHAR1,25,12, "GEHEN{SPACEFSIETSPACEFNACH" 

360 FORI=1T04 

370 IFMID$S(L$(X,YV) ,I,1)<>". "THENRICDI=1:ELSERI (I 
)=0 

380 NEXTI 

590 IFRI(1)=1THENCHAR1 „27,14," {RVSONIN{RVSOFFIOR 
DEN" : GOSUB670 

400 IFRI(2)=1THENCHAR1,27,16,"{RVSONID{RVSOFFIST 
EN" :G0SUB760 

410 IFRI(3)=1THENCHAR1 ,27,18,"{RVSONIS{RVSOFFIUE 
DEN" : 560SUBB90 

420 IFRI (4)=1THENCHAR1,27,20," {RVSONIWERVSOFFIES 
TEN": GOSUB910 

430 2$="":FORI=1TOSSTEP2 

440 7$=7$+"2"+MID$(TI$,I,2) 

450 NEXTI 

460 CHAR1,25,22,"ZEIT"+Z$ 

470 CHAR1,28,24,"{RVSONFYESCT{RVSOFF SPACEI={SPACE 
+ENDE{UP}" 

480 GETAS 

490 REM SPIELZEIT 30 MINUTEN 

500 IF VAL(TI$) >003000THEN1750 

Sıo I=5 

520 FORJ=1T04 

530 IFA$=MIDS(L$CX,Y) ,J,1) THENI=J 

540 NEXTJI 

550 IFI<STHENS8O 

560 IFA$=CHR$ (27) THEN1410 

570 GOT0430 

580 LY(X,Y)=1 

570 ONIGOTO600,610,620,630 























600 .Y=Y+1260T0640 
610 X=X+1:60T0640 

620 Y=Y-1:G0T0640 

630 X=X-1 

640 I=0 

650 IFX=19ANDY=19THEN1650 

660 G0T0330 - 

670 REM TUER VORNE (NORDEN) 

680 CHAR1,10,11,"{CA SC2 cs}" 
690 CHAR1,10,12,"{S- SPACEZ S-}" 
700 CHAR1,10,13,"{S- SPACE2 S-}" 
710 CHAR1,10,14,"{S- SPACE2 S-}" 
720 CHAR1,10,15,"{S- SPACE2 S-}" 
730 CHAR1,10,16,"{S- SPACEZ S-}" 
740 CHAR1,10,17,"{CY. SPACE2 CY}" 
750 RETURN 

7&0 REM TUER RECHTS (OSTEN) 

770 CHAR1,19,11,"(S02 SP}" 


780 
790 
800 
810 
820 


830 
840 
850 
860 
870 
880 
8970 
900 
910 
920 
930 
940 
950 
960 
970 


CHAR1,19,12,"{CG CH CH}" 
CHAR1,19,13,"{C62 CH}" 
CHAR1,19,14,"{C62 CH}" 
CHAR1,19,15,"{CG2 CH}" 
CHAR1,19,16,"C62 CH}" 
CHAR1,19,17,"{062 CH}" 
CHAR1,19,18,"{SL CG CH" 
CHAR1,19,19,"{SPACE2 CH}" 
CHAR1,19,20,"{SPACE2 CH}" 
EHAR1,19,21,"{SPACE2 CHY" 
RETURN 

REM TUER SUEDEN NICHT SICHTBAR 
RETURN : 

REM TUER LINKS_ (WESTEN) 
CHAR1,02,11,"{S0 SPp23" 
CHAR1,02,12,"{CG CN cH}" 
CHAR1,02,13,"{CG CN CH}" 
CHAR1,02,14,"{CG CH CH}" 
CHAR1,02,15,"{CG CN2}" 
CHAR1,02,16,"{CG CN CH}" 
980 CHAR1,02,17,"{CG CH CH}" 
990 CHAR1,02,18,"{C6 CH S@}" 
1000 CHAR1,02,19,"{CH SPACE23" 
1010 CHAR1,02,20,"{CH SPACE2}" 
1020 CHAR1,02,21,"{CH SPACE2}" 
1030 RETURN 

1040 REM BILD 

1050 SCNELR 


Compute mib 


<39> 
<17> 
<535> 
<195> 


<213> 
<147> 
<136> 
<6> 

<101> 
<194> 


<231> 
<145> 


<251> 
<15> 
<150> 


<16> 

<201> 
<164> 
<215> 
<193> 


<17> 
<112> 
<b2> 
<153> 
<75> 
<101> 
<24> 
<52> 
<187> 
<251> 
<134> 
<14> 
<192> 
"<&2> 
<68> 
<B6> 
<221> 
<171> 
<183> 
<222> 
<236> 
<B> 
<176> 
<194> 
<212> 
<230> 
<248> 
<84> 
<126> 
<223> 
<120> 
<99> 
<193> 
<211> 
<229> 
<247> 


<9> 
<200> 
<58> 
<3> 
<21> 
<1> 
<18> 
<21> 
<176> 
<243> 
<90> 
<108> 
<126> 
<1835> 
<162> 
<180> 
<189> 
<42> 
<243> 
<5> 
<152> 
<134> 
<6> 


1080 
1070 
1080 
1070 
1100 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
12109 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1580 
1390 
1400 
1410 
1420 


FORI=0T06 
CHAR1,1,I,"{SH2" 
CHAR1,23-1,1,"{SW}" 
CHAR1,1,23-1,"{SN3" 
CHAR1,23-1,23-1,"{S4}" 

NEXTI 

FORI=7T016 

CHAR1y1,6,"{CP}" 

ECHAR1,1,17,"{CY}" 

CHAR1,6, I,"{CH}" 

EHAR1,17, 1," {CH}" 

NEXTI 

FORI=0T024 

CHAR1,24,1,"£CH}" 

NEXTI 
CHAR1,28,1,"{RVSONIRIESEN-RVSOFF}" 
CHAR1,27,3,"{RVSON}LABYRINTHLRVSOEFF" 
CHAR1 „25,6, "KOORDINATEN" = 
CHAR1 ,27,7,"DIESES{SPACE}RAUMS" 
CHAR1,26,9,"X=":PRINTX 
CHAR1,33,9,"Y="3PRINTY 

RETURN 

REM SPIEL LADEN 

SCNELR 

OPEN1,1,0,"LABYRINTH" 

INPUT#1,T$ 

INPUT#1,X 

INPUT#1,V 

FORI=0T019 

FORI=0T019 

INPUT#1,L%(1,J) 

NEXTI 

NEXTI 

CLOSE1 

RETURN 

REM SPIEL BEENDEN 

SCNCER 

1430 CHAR1,10,5,"SPIELSTAND{SPACEISPEICHERN" 
1440 CHAR1,18,7,"(FLASHONFJCSPACEY/CSPACEIN{FLAS 
HOEF>" 

1450 GETKEYA$ 

1460 IFA$="J"THENGOSUB1520 

1470 CHAR1,12,10, "SPIELTSPACE3BEENDEN" = 
1480 CHAR1,18,12," {ELASHONIJTSPACEI/LSPACEINLELA 
SHOFF>" ; 

1490 GETKEYAS$ 

1500 IFA$S="N"THEN3ZO 

1510 END 

1520 REM SPIEL SPEICHERN 

1530 SENELR 

1540 OPENI1,1,1,"LABYRINTH" 

1550 PRINT#1,T$ 

1560 PRINT#1,X 

1570 PRINT#1,Y 

1580 FORI=0T019 

1590 FORJI=0TD17 

1600 PRINT#1,L%4(1,J) 

1610 NEXTJ 

1620 NEXYI 

1630 CLOSEi 

1640 RETURN 

1650 REM AM ZIEL 

1660 FORI=1T016 » 

1670 FORI=0T07 

1680 COLOR4,1,J 

1690 NEXTI 

1700 NEXTI 


1710 SCENELR 

1720 CHAR1,5,5,"{FLASHONISIETSPACEISIND{SPACEIAM 
{SPACEIZIELTFLASHOFFF" 

1730 CHAR1,10,10,"IHRE{SPACE}ZEIT"+Z$ 

1740 END : 

1750 REM ZEIT VORBEI 

1760 SCNELR 

1770 CHAR1,5,5, "VERLOREN, {SPACE} ZEITLSPACEIUEBER 
SCHRITTEN" : 

1780 END 

1790 REM LABYRINTH 20 X 20 IN DATAS 

1800 DATA ND.. „N. .W,ND. .,.D.W,-0.W,ND-W,.O-W,ND. 
W,.0-.W,ND.W 

1810 DATA NO.W,.O.W,N. -W,ND. . „ND-W,-O.W,N. .W,ND. 
ee 

1820 DATA N.S. ,.0S. ‚NOSW,.D.W,N. .W,.08. 42. -WyN.S 
-;NO..,..5W 

1830 DATA „.5. N... „NOS. 5..SW,NDS. 4...W,N.8. ,.08 
.,-0-.W,N.S. 






































<137> 
<123> 
<75> 
<22> 
<254> 
<110> 
<61> 
<55> 
<19> 
<68> 
<64> 
<170> 
<85> 
<83> 
<200> 
<184> 
<162> ° 
<199> 
<139> 
<202> 
<226> 
<136> 
<251> 
<247> 
<o> 
<145> 
<247> 
5 
<19> 
<31> 
<a3> 
<117> 
<125> 
<117> 
<11> 
<126> 
<121> 
<1> 


<91> 

<149> 
<116> 
<109> 


<102> 
<189> 
<159> 
<107> 
<59> 
<231> 
<247> 
<150> 
<252> 
<10> 
<4> 
<16> 
<48> 
<102> 
<11> 
<102> 
<252> 
<247> 
<67> 
<245> 
<37> 
<182> 
<190> 


<156> 
<158> 
<121> 
<82> 

<154> 
<206> 
<103> 
<122> 
<156> 
<216> 
<119> 
<85> 


<135> 
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1840 DATA „DS. „N. .Wy..5- NO... „NSW,ND- 42. .W, NOS 
. 4. DSW,ND.W 

1850 DATA .O-W,N.5W...52 3N-2. 3 N28- 3N4 2.08. 4.0. 
W,.D.W,N.SW 

1860 DATA N... ,-.05- „N..W,N.S. „.08. „.O5W,N. -Wy..5 
als = 
1870 DATA N. .W,NOS. „...W,NOS. „.0SW,..SW,ND. » 2.0. 
W,N..W,N.S. 

1880 DATA NDS. „...W,NDS. „.OSWyN. „WaN. 2. 4-08. 4-0. 
W.-05W,...W 

1870 DATA NOS. „.05W,...W,.05- „N. »W,ND. 2 4N.SW,N.. 
.;N-8. ,N.S. 

1900 DATA .0S. „NO.W,NDSW,...W,.05. „NOSW,ND.W,.0. 
W.-.0.W,N..W 

1910 DATA .0S. „NO.W,...4,.0.. 7N.SW,NDS. z. . SW, NDS 
.4..5W,N.8. 

1920 DATA ND.. „..SW,NDS. „NO.W,NO.W,..5W,..5- ;ND. 
.,.0.4,..5W 

1930 DATA N... ,-.05- „N. .W,.0.. 3. 0SW,N.SW,.0. . „NOS 
Wun..W,N.S. 

1940 DATA N.S. „NO... ,..5W,N.S. ,.05. „NO-W,N. -W,..8 
.,.0..,NO.W 

1950 DATA .OSW,N. .W,.05. ,N..W,.0..2 42. 5W,N0..,.08 
Wan W,N.S. 

1960 DATA NOS. „.OSW,ND.W,.OSW,ND.W,..5W,N.S. „NO. 
4. 0.W,NOSW 

1970 DATA ...W,.08. ,N..W,.08- z-.0-W,...W,.05. ,-0. 
W.N..W,N.S. 

1980 DATA „08. „N. .W,.05. „N. .W,.08. 3.0-W,..5W,N.5 
esNeno,N.S. 

1990 DATA .O..,.0.W,.05W,.D-W,N. „WIND. 5-0.W, N. 
W,N.S. ,N.S. 

2000 DATA ND.. „NOSW....WN.S. ;ND. » „ND-W,-O.W,. 8 
W,N.S. ,.0S. 

2010 DATA .0.W,.0.W,.0-.Wr ..W, 205: „N. SWEN. 2.3.08 
“1. BW,N.S. 

2020 DATA ».8. 4.05.41. .Wy2.52 30-8. 32.80 7Ne ne 920. 


<226> 
<193> 
<14> 
<S50> 
<251> 
<21> 
<139> 
<228> 
<131> 
<1977> 
<82> 
<215> 
<87> 
<23> 
<172> 
<63> 
<115> 


<115> 





.,.0SW,.0.W 


programme 


<178> 


2030 DATA .0.W,NO.W,.0.W,ND-W,N. .Wy..5- „NOS. „.0. 


W,.0O.W,..5W 


<62> 


2049 DATA N... ,N0..9-.5W,.0.. ,NOSW,.0.W,.05W,... 


W,ND..3...W 


<22> 


2050 DATA .-O..,N.SW,NO. . „..SW,NOS. „.O.W,..SW,N.. 


Nds 


<122> 


2080 DATA NOS. „.OSW,N. „W,ND. . „. .SW,NO. . „NO.W,.D. 


W,..5W,ND.. 


<110> 


2070 DATA N. .W,..5. „NO. . „N. .W,..5. 4 NO. N. .W,.0S 


-,.0SW,N. .W 


<a2> 


2080 DATA N.8. „N... ,N.8. 5:08. ,„NO.W,..5W,..8. „NO. 


-4.0.W,N.SW 


<236> 


2090 DATA NOS. ye..W,N.5. 5.05. 4: .-.W, N. 5. 4208: 3Neo 


W,NO. . „N.5W 


<198> 


2100 DATA .0S. „N.SW,NOS- „N. .W,N.S- 3.0. . „NO.W,.08 


W...W,N.S. 


<231> 


2110 DATA .08S. „N. .W,N.S. „NO. . „N. .W,.05. ,.O.W,NOS 


W,N.SW,N.S. 


<11> 


2120 DATA N... ,N.5. „N.5. „N.5. 5.05 „N. .W,N. 5. 5.0. 


.,N..W,..8. 


<180> 


2130 DATA N... ;N.5.,..5-. „N.5.,.05.,.0.W,ND.W,..8 


W...5-.,N.8. 


<88> 


2140 DATA NOS. „N.SW,..8. ,.05. „N. .W,.05. 2. .5W, NO. 


.„NOSW,...W 


<11> 


2150 DATA N.S. „NOS. ,„.O.W, . OSW,ND.W,N. „W,N.5. „NO. 


N... 


<75> 


21580 DATA N.S. „2.5. 3NO. . N. Wu 8. „NO. 24.0. W,N.5 


W,NOS. „N..W 


<185> 


2170 DATA N.S. „N.8. ,-0..,.0-.W,N.SW,N.8. „N.8. ,N.8 


.,.05-,N..W 


2180 DATA .05,,-0.W,..5W,.05. ,.0.W,.05W,...4,..8 


08450 © 


<17> 


<176> 


2190 DATA „..5W,.05. ,.0.W,u0.Wy,..8. 40.8. 1.08. 4.08 


N... 
ENDE DES LISTINGS 


Der Spielhallenhit 


<62> 











Aus der Spielhalle werden Sie die- 
ses Spiel sicher kennen. Widerlich 
aufdringlicee Gliederwürmer 
kommen aus dem All und bewe- 
gen sich schlängelnd auf die Erde 
zu. Mit einer Laserkanone sollen 
Sie nun die Erde vor diesen Tie- 
ren bewahren. Sie steuern wahl- 
weise mit den Tasten ”S” (hoch), 
”X” (runter), ”:” (links), ”:” 
(rechts), SPACE (Feuer) oder mit 
dem Joystick in Port 1. 


Compute mib 


Auf dem Blidschirm befinden 
sich. noch eine Reihe von Pilzen, 
die ebenfalls abgeschossen werden 
können. Nach dem vierten Tref- 
fer verschwindet ein Pilz voll- 
ständig. 

Punktvergabe: 

Wurmteil: 100 Punkte 
Piztreffer: 1 Punkt 


programme 


Eingabehinweise 
Nach Einschalten Ihres Compu- 
ters geben SIe MONITOR (RE- 


TURN) ein. Danach tippen Sie 
das Listing ein, wie es abge- 
druckt ist. 

Nachdem Sie das Programm 
vollständig abgetippt haben, 
speichern Sie es bitte sofort ab. 


1. auf Diskette S’CRAZY 
WORMS”,0,1200,2DBA 


2. auf Kassette S’CRAZY 
WORMS”,1,1200,2ABA 


Nun verlassen Sie den Monitor 
mit X und können das Spiel mit 
SYS 4608 starten. 


monitor 


Pc ser acxr ur sp 
Fan a 2 u «1 BEE 2 Ze 2 Ze 2 ze 2} 


>1208 39 80 8d f8 a7 85 
>1208 d2 a9 da 85 di a9 
>1218 d3 Sd 13 ff 2a 08 
>1218 91 d2 c8 da #9 e& 
>1228 d3 25 dS 09 4@ da 
>1228 c@ 8d 12 ff a9 3b 
>1239 85 38 29 #6 95 33 
>1238 4c 7c 12 @2 30 7e 
21249 ff 18 18 18 3c Te 
21248 ff 06 908 08 30 Te 
>125Q e3 98 28 098 3c 7e 
>12583 a8 82 aa aa oe a8 
>1252 aa aa 08 aa 18 18 
>1263 30 Te ff ff ga aa 
>1270@ 13 ea 0a aa 42 3 
>1278 7e Te 3c 42 a2:08 
>1288 12 9d c@ 3f e8 ea 
31283 f5 40 86 2a 086 3a 
>129@ 88 99 22 1e 93 22 
>1298 38 20 31 3a e?7 34 
>1238 3a 81 54 k2 31 34 
>1238 3a 58. k2 k5 28 kb 
>12b8 29 ac 37 96 38 29 
>1268 39 3a. 97 33 39 37 
>12cAa 58 20 31 32 38 88 
>1208 82 08 97.32 308 34 
>12d@ 58 2c 36 3a 82 aa 
>12d8 83 a8 99 22 05 13 
>12eQ 53 43 4 52 45 3a 
»12e8 3Q 30 3a 30 29 28 
>i2fa 2a 20 2u 20 29 2a 
>12f8 20 48 49 3a 38 30 
>1349 32 30 22 3a 9e 34 
>1383 37 08 00 08 a2 0a 
>1318 12 94 88 19 e8 ea 
>1318 f5 39 98.20 d2 FF 
>1329 8d 15 ff 3d 19 fr 
>1328 85 ef 29 52 a2 55 
>1338 8d 27 85 Se 28 85 
>1338 085 a9 Bd 8d 2a 85 





Fehlerkorrektur 

Läuft das Programm nicht, dann 
müssen Sie es neu einladen und 
anschließend in den MONI- 
TOR gehen und mit M 1200 
mit der Fehlersuche beginnen. 
Haben Sie Fehler gefunden und 
verbessert, vergessen Sie nicht 
das Programm erneut abzuspei- 
chern. 


Einladen 

Von Diskette LOAD "CRAZY 
WORMS” 8,1 

von Kassette MONITOR (RE- 
TURN), L (RETURN) 
Gestartet wird mit SYS 4608 
Viel Spaß! 





>1348 
21349 
>1358 
>1358 
>12368 
>12368 
>1378 
>13783 
>1388 
>1388 
>1398 
>1398 
>13a8 
>1338 
>13b8 
>13b8 
>13c8 
31308 
>13d8 
>1348 
>i3eB 
>13e8 
>13f8 
>13f8 
>14098 
>1498 
>1418 
>1418 
>1428 
>1428 
>1438 
>1438 
>14408 
>1448 
>1458 
>1458 
>1469 
>1468 
>1479 
>1478 
>1488 
>1488 
>1498 
>1498 
>1438 


CSompube mi 
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Pr: 









31758 
>BiTreRn a4 85 dh aa ma a9 Tf 91 
Y1r758 dS 31 da ee 4d Ih ad 4d 
>177A 3b cd AA Fk da 03 do 63 
>1773 19 a2 BA ac Be 3k e8 e3 
>irea 83 da fk kd ih Sb 85.d9 
>1788 kd 1c 3k 85 d9 ac Bd 3b 
>1730 ca aa FO Ad e& dS 35 d& 
>1rT98 c3 aa da @2 es d3 883 da 
->1739 #3 35 d8 85 da 35 d9 e9 
>17a8 a4 85 de aa aa 39 Ft 31 
»irka dB 91 da ee dd 3b ad Ad 
>iTk?2 3b cd @R 3b de 83 dc 63 
>17cA 19 a2 @@ ac iG Ih e8 e8 
>17c8 88 da fh kai ik 3h 85 dS 
>i1r7da bd ic 3u 85 d9 ac Of 3% 
>1743 ca aa fa Ad e6 dS a5 d3 
>1Tet c9 aa dA 92 es d9 33 da 
>»ireS #3 a5 dS 85 da a5 d9 e9 
Dirfa a4 85 db aa aa 39 7 31 
>1773 dS 91 da ee Ad 2k ad Ad 
>13AR Th cd BR Ik da M3 40 63 
>1803 13 a2 @R ac 12 Ik eS e8 
>isia 83 da fb kd ik 2k 85 d8 
>1818 ka ic 3k 85 d9 ac 11 3b 
>ıs2a ca Ba fa Od e& dS 35 d3 
>1828 c9 aa da @a2 e& d3 38 da 
>iıe3Q #3 a5 d8 85 da a5 d9 e9 
: 31838 4 85 db a8 RB a9 7f 91 
>i1S48 dS 31 da ee Ad 2kı ad Ad 
>1343 2b cd BB 3h da 83 4c 63 
>i135a 19 a2 aa ac 14 Ih e8 e8 
>1858 83 dA fh kd ik Sk 85 dS 
>136Q kd ic 36 35 d9 ac 123 Ib 
>isss ca aa fa Od es dS 35 d8 
>1370 c9 RAR da GE e6 d9 S3 da 
1878 #3 35 da 85 da a5 d9 e9 
>ıssa 84 85 dk ad aa a9 7f 91 
>is28 dS 91 da ee Ad 3b ad Ad 
. 1892 36 cd Ad 36h da a3 do 63 
>1398 19 a2 00 ac 16 3b eß e8 
>183Q 88 dA fh ka ik 3b 35 d8 
>1838 kd ic 3 85 d9 ac 15 3b 
>iakba ca am fa Ad e6 dS a5 dS 
>18h8 c9 aQ da a2 e& d9 38 da 
>i1sca f3 a5 dB 85 da a5 d9 e9 
" >1EcR 4 85 dk ad aa a9 7f 91 
>12d9 dS 91. da ee Ad 3b ad dd 
>18d48 3b cd aa 3b da 83 do 63 
>i18eR 19 a2 QG ac 13 3b e8 e8 
>iSe8 88 dA fk kd ik ah 85 dB 
>13f0 Kd ic 3k 85 d3 ac 17 36 
DiSstS ca aa fO Ad es dB a5 d8 
>130R 09 BA dA @2 e6 d9 88 da 
319308 #3 35 d@8 85 da 35 d9 e9 
>1910 84 85 dk a8 aa 39 7f 91 
>1318 d3 91 da ee dd 3b ad dd 
>192@ 36 od 68 3b dB 83 dc 63 
>1928 19 a2 BG ac 1a 23h e8 e8 
>1338 83 dß tb kd ik 3b 85 dS 
>19338 kd 1c 3b 85 d9 ac 19 3% 
>134Q ca 08 fü Qd e6 dS a5 d8 
>19343 c9 88 dB. 82 e6& d9 88 da 
>1358 #3 a5 d8 85 da a5 d9 e9 
31258 a4 85 db aa 89 a9 7f 31 
>19E0 d8 91 da dc @4 Ik ea ea 
>19638 ea ea ea ea ea ea a2 08 
>19378 ac 68 Sk eß e8 88 da fb 
>1978 kd ik 3h 85 d8 kd ic 3b 
>1984 85 d9 ac 67 3b ca Ba fa 
>1983 Ad e& dS 25 dS c9 88 da 
>199m 92 e& d3 883 dB f3 28 a8 
>1933 29 20 91 d8 a5 c6 ea ea 
>1323M ea ea ea ea c9 i2 dA 083 
>1333 4c 87 1d c9 2d da 93 40 
>139ha 87 id 3 13 da 93 4c kA 
>132b63 id c9 32 d8 83 4c ka id 
>19c8 c9 1a da a3 40 36 1d c9 
319c8 ad da a3 dc 36 id c9 11 
>1248 dB @3 4c 61 id c9 17 da 
>D1948 M3 4c 61 1d c9 16 dB a3 
>19e8 4c 35 da c9'3c dA 83 40 
>19e3 35 ia 4c SQ la ce 67 3k 
>19fa ad 67 36 09 ff da 85 39 
>19f8 ga Sd 67 
>1208 
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>i1ang 
>i1a1d 
>1318 
>1a20 
>1328 
>1a3a 
>1333 
>13.48 
>1248 
>1250 
>1358 
>i13a6R 
>1358 
>1a7c 
»>1373 
>i1a8d 
>1323 
>133@ 
>i1asE 
>133a& 
>1aa8 


" >i1abl 


>1akıS 
>13c0 
>1ac8 
>13d2 
>iads 
>i1aed 
>i1ae8 
>i1afa 
>iaf8 
>ikaa 
>1ikR3 
>1k1R 
>1b18 
>ik2u 
>ik28 
>iks3a 
>1K3R 
>ik49 
>1K42 
>ihs5a 
>1h58 
>iksa 
>i1kı58 
>ikra 
>ihr73 
>ikEO 
>1h33 
>i1k9a 
>ih98 
>ihad 
>ikas 
>ikhd 
>ikk8 
>ikhc® 
>ikoR8 
>ihda 
>ikd8 
>iheä 
>ihes 
>ikfe 
>ikr8 
>18 
»1caR 
>1c1d 
>ic1& 
>ic2a 
21028 
>1034 
>1c38 
>ic4a 
>1c483 
>1c5@ 
>1058 
>i1c6Q 
>icsRß 
>icrTe 
>1c78 
>1c8Q 
>1c83 
>1c9a 
210983 
>icaed 
>i1ca8 
>ickB 


ia 
14 
4c 
36 
83 
3 
69 
33 
az 
da 
Te 
aa 
ea 
35 
85 
a9 
ea 
a2 
da 
41c 
ag 
aa 


aß 


ea 
a0 
bd 
85 
ad 
a2 
vi 
2a 
2a 
a9 
ad 
Er 
3b 
ad 
40 
e8 
85 
59 
a5 
88 
ds 
o1 
ea 
e3 
85 
89 
35 
88 
2a 
Ik 
bad 
95 
ad 
a2 
Er] 
85 
47 
78 


a8 
id 
oa 
de 
4c 
44 
c9 
a4 
fh 
3k 
fa 
da 
aa 
85 
da 
83 
aa 
Ik 
ak 
sa 
c9 
af 


ce, 


da 
98 
9 
3b 
ei 
Ik 
ei 
a8 
fb 
3b 
fa 
da 
a8 
dk 
Sg 
ea 
aa 
fk 
3kı 
fa 
da 
ao 
ea 
5a 
ik 
da 
e6ö 
e6 
d8 
4c 
2a 
BI: 
44: 
ea. 
3 
6% 


69 


e8 
ds 
akı 
ds 
aa 
ce 
da 
ea 
eö 
a8 
Ik 
ds 
da 
f8 
22 
ih 
da 
e6 
es 
Te 
d9 
8e 
da 
40 
08 
I 
et 
a9 
d3 
24 
88 
3k 
kd 
85 
ad 
e2 
a9 
3b 
fS 
ab 
84 
e8 
3d 
ak 
[-1=] 
23h 


+3 


a 


da 


40 


85 


69 


a5 
83 
ds 
ff 
au 
id 
7a 


. da 


4c 
28 
c3 
aa 


' 82 


aa 
Sk 
ac 


49 
Er 
51 
as 
ed 
3b 
88 
Sb 
B& 
ak 
28 


ad 
15 


68 


a5 
1a 
ad 
3b 
Ik 
3 
ak 
ac 
da 
a9 
a5 
aa 
ea 
ea 
Sb 
3b 
20 
ds 
[ee 
so 
ea 
«8 
ds 
ak 
da 
da 
da 


ad: 


ak 
ff 
a7 
ea 
83 
6a 
5a 
fk 


3 


fa 
da 
aa 
ad 
ea 
aa 
fk 


: 3b 


fa 
da 
aa 
er 
e8 
ds 
3b 
ds 
da 
a5 
3 
ea 
aa 
9 
34 
83 
d9 
a8 
7 
3b 
4 
e8 
85 
83 
as 
88 
de 
3b 
bd 
is 
az 
da 
bd 
ie 
ee 
da 


8d 


&r 


Sd 


3b 
3kı 
kıd 
85 
ad 
e2 
a9 


ea 


Sc 
ac 
kacl 
85 
ad 
e2 
hi 
ib 
38 


kd 


ca 
9 
f3 
d9 
ds 
ea 
a9 
79 
ds 
a3 
id 
aa 
fa 
ad 
3a 
es 
ds 
kb 
43 
da 
a2 
e3 
si 
de 
fe 
fk 
84 
ad 
af 










c9 
3b 
683 
ad 
3b 
84 
3k 
ea 
83 
kd 
ca 
69 
f3 
24 
[212] 
ea 
sa 
88 
bad 
c8 
c93 
f3 
ea 
88 
fb 
Ik 
f8 
da 
eo 
3e 
23 
ff 
sa 
ff 
6kı 
5a 
83 
a8 
3b 
ac 
d8 
d9 
91 
c9 
3b 
Sk 
Sb 
ac 
ds 
d9 
I 
63a 
fb 
3b 
fa 
da 
98 
a4 
a2 
c9 
91 
89 
d9 
ad 
7 
ds 


"4 


3k 
ac 
da 
ic 
2a 
09 
aa 
bad 
16 
9d 
a9 
ea 
83 
8d 
3h 
ad 


Compute mik 


programme 


>ich3 
>iccd e2 e8 88 d@ fh bd ib 3b 
>icc® 85 d8 bad ic 3b 85 d9 ao 
>i1cdA 4 3h e6 d8 c9 aa da a2 
>icd8 eS d9 82 dR #5 39 78 ad 
>iceR 89 91 d3 a5 d9 e9 a4 85 
>ice8 d93 393 085 ea ea 91 d8 ea 
>ict@ ad Gb Ac c9 39 fa G4 ee 
>ict8 ak Bo 69 39 39 Sd Ak Ac 
>idaR ea ad Ra Ga c9 39 fa 96 
>ida3 ee Ga As ex ea 60 a9 39 
>idia ad Ba Rc ad a9 ac c9 39 
>id13 fB.86 ee 09 @c ea ea 68 
>id2za a9 38 8d 23 Bo ad 88 Bc 
>i1d23 fa 86 ce AS Bc ea ea .68 
>1d3R 39 30 Bd a8 Ro 584 ce 68 
31438 33h ad 68 3b 69 14 dA 85 
>14408 a9 15 Sd 68 3h 2a 98 1a 
>1d48 c9 7 da 93 28 3e 2a c9 
>id5a 20 da 83 dc 5B Aa ee 68 
>1d58 Ib ea ea ea ea ea 4c 58 
>idE@ 1a ee 63 3b ad 63 3k c9 
>1d58 19 da 05 a9 18. 9d 63 3b 
>idre 28 938 1a c9 7f de a3 28 
>1d79 3e 2a c39 20 da 93 4c 58 
>1d38 1a ce 68 3b 4c 58 ia ce 
>1d38 67 3b ad 67 3b c9 ff da 
>i1daaa a5 a9 9Q Ad 67 3k 20 98 
>1498 ia 09 7f da a3 28 3e 2a 
>ida@ c9 28 da a3 40 58 1a ee 
>1da8 67 Ik da 50 la ea ea ea 
>idka ee 67 3h ad 67 3b 09 28 
>1dh8 da a5 a9 27 Sd 67T 3h 28 
>idca 98 1a c9 7f da 83 20 3e 
>idce8 2a c9 2a da 983 4a 58 ia 
>idAR ce 67 3k 4c SQ 1a ea ea 
>idd8 ea 39 E80 3d 6b 3b ad Ad 
>ideR dc 09 39 fa 84 ee Bd 9o 
>ide8 6A a9 30 Sd Ad Br ad @c 
>idfe Ac c9 39 fa 84 ee Bo Ac 
>idf3 68 a9 38 Sd Gc Bc 40 fO 
>i1eRR ic ea ea ea ea ea ae 50 
>1e08 36 e@ 13 d@ a3 dc fB ic 
>1eiM ad Bi 3k c9 BR fB 19 ee 
>ie13 44 36 ad 4f 3b 09 28 d® 
>ie2a a3 4c fQ ic 40 ac if ce 
>ie28 4 36 ad 4f 3 09 ff da 
>ie3a 03 da FA ic Jo ac if ea 
>ie33 ea ea az 88 ac 94 3b e8 
>ie4Q e8 88 dd fh kd ib 3b 85 
>ie48 dS kd ic 36 85 d9 ac 83 
>1e58 3b ca 88 fa Ad e6 d8 a5 
>ie58 d8 c9 BA dO 82 e& d9 88 
>ie6R dB 3 a8 80 39 28 91 dS 
>ie68 a9 Bc Bd OR 3b a9 AA aa 
>i1eT8 9d R3 3b 69 81 e8 eS ed 
>ie78 18 da #5 a9 a2 a2 81 9d 
>iesa 83 3b e8 e9 eB 19 dA f7 
>1e88 ee 7A 3 do f@ Ic ad 12 
>ie9A Bc 09 28 fa 88 a9 2a Sd 
>1e98 12 8c 40 kb ie ad il @c 
>iead c9 20 fO Q8 a9 20 Sd 11 
>ie38.0c 4c bb le ad 18 dc c9 
>ieka 28 da 83 40 8f 25 a9 28 
>ieb8 8d 18 Bo a2 88 ao 68 3b 
>iec® e8 e8 88 dB fb kd ib 3b 
>iec8 85 dS 85 da bd ic 3b 85 
>iedR d9 85 db. ac 67 3b cd BA 
>ied8 FB 141 e6 dS e6 da a5 d8 
>i1ee8 09 BA da a4 e6 d9 e6 db 
>iee8 88 dO ef a5 db e9 94 85 
>ief@ dk a9 AB 91 da 69 81 c9 
>iefs8 ff de f8 a9 47 Sad 11 ff 
>i1faa a9 56 a8 AR 91 dS 28 9% 
»1ra8 if a9 57 aa Qa@ 91 dB 28 
>if19 Ih Af a9 58 ag 088 91 d8 
>iris 2a M if a9 59 ad 98 91 
>if2a dS 28 9b 1f a9 28 >30 00 
»1f28 91 d8 a9 14 8d 67 3b a9 
>irsa 18 Sd 68 3b a9 07 Sad 11 
>1f38 ff a9 50 85 de a9 Bo 85 
>1f4a d9 ad 88 ki dS c9 28 f& 
>1f43 24 c9 79 da 83 40 69 if 
>Dir5a c9 7a dB 83 40 69 if 09 
»1F58 
>1f6@ 




























































































Programme 









>1f68 
>1f78 
>1f78 
>1f8a 
Dı1f88 
>1f98 
>198 
>ifaR 
>ifas 
>1fhO 
>1fh8 
>1fcO 
»1f08 
>1Ffda 
»1Ffd8 
>ifeB 
>i1fe8 
>1rffe 
>Difr8 
>20a0 
>22a3 
>2018 
>2018 
>202@ 
>2028 
>293@ 
>2038 
>2849 
>2948 
>2859 
>2053 
>2068 
>2868 
>2070 
>2078 
>208a 
>2a38 
>2098 
>2098 
>2930 
>2038 
>20k8 
>2AR3 
>22c8 
320808 
>20d8 
>20d8 
>28e8 
>20e8 
>28f8@ 
>20r8 
>21aa 
>2188 
>2118 
>2118 
>21208 
>2128 
>2138 
32138 
>2148 
>2148 
>2158@ 
>2158 
>2168 
>2168 
>2178 
>2178 
>2188 
>2188 
>2198 
>2198 
>213@ 
>2138 
>21k8 
>2168 
>2108 
>2108 
. 22148 
>21d8 
>21e8 
>21e83 
>2i1fa 
>21f8 
>2208 
>2208 
>2218 




































































af 
e6 
a9 
9d 
18 
83 
4c 
de 
ea 
3b 
3k 
ac 
ds 
d9 
91 
a9 
ea 
a8 
ee 
3b 
a9 
c9I 
oa 
Sk 
123 
3b 
78 
c3 
3b 
3b 
29 
Sk 
c9I9 
a2 
2a 
28 
da 
28 
da 
28 
24 
v2 
Be 
3b 
73 
Sb 
7b 
ae 
3b 
ae 
3b 
Tb 
4c 
73 
28 
3k 
88 
7b 
ib 
d3 
e6 
e6 
28 
36 
ee 
da 
7d 
3b 
a9 
70 
ea 
a9 
ce 
do 
88 
3b 
a8 
76 
ds 
7a 
8d 
c5 
aa 
20 
sa 
28 





d9 
80 
83 
de 
3b 
54 
fd 
ea 
e8 
85 
4 
a5 
83 
d8 
e2 
ea 
08 


sd 


I 
aa 
PIC] 
ad 
3b 
a9 
c9 
3b 
e5 
40 
ea 
a9 
9 
ai 
da 
c9 
se 
dc 
ed 
of 
ed 
4c 
3b 
Tb 
ae 
3b 
ae 
3b 
Tb 
4o 
77 
2a 
3b 
27 
3b 
f@ 
8d 
sa 
3b. 
Ik 
ac 
ds 
d9 
91 
c9 
7a 
Sd 
3b 
ad 


3b 
ea 
ea 
76 
15 
8d 
ee 
8d 
3b 
es 
3b 
4e 
ds 
30 
3e 
223 


8d 
3b 
+5 
e8 
2a 
e8 
ea 
e8 
ds 
3b 
de 
de 
a5 
31 
ea 
c8 
3b 
18 
8d 
da 
6d 
ea 
[-1=] 
85 
se 
da 
44 
c9 
oa 
ea 
da 
86 
83 
29 
2a 
2a 
28 
2a 
fa 
ae 
3b 
7b 
4c 
75 
28 
3b 
27 
3b 
d4 
Sd 
21 
Sd 
23 
78 
ea 
e8 
85 
7a 
as 
88 
d8 
ei 
3b 
a9 
c9 
7b 
8d 
8d 
ea 
8d 
3b 
a9 
70 
7b 
70 
2a 
bd 
9 
3b 
ba 
bi 
2a 
ad 


08 
63 
a9 
e8 
a2 
ea 
ea 
83 
hd 
ca 
c9 
f3 
d9 
ds 
ea 
de 
ee 
de 
So 
as 
3k 
ea 
8d 
da 
sf 
85 
2a 
18 
Sc 
da 
a3 
20 
de 
28 
af 
28 
af 
2a 
if 
73 
2a 
3b 
27 
3b 
b8 
Bd 
ei 


23 
76 
sa 
7a 
ad 
Sk 
ea 
es 
d3 
Sk 
ds 
da 
ea 
f8 
ad 
27 
81 
3b 
7b 
7d 


ea 


7o 
ad 
82 
3b 
3b 
3b 
aa 
ib 
88 
a5 
82 
d8 
09 
7d 


36 
ei 
82 
ea 
08 
ea 
a2 
da 
ic 
8a 
ea 
aa 
e9 
40 
ea 
fd 
se 
e8 
3kı 
28 
ad 
da 
se 
14 
3b 
a9 
ea 
f@ 
71 
83 
2a 
af 
89 
ed 
2a 
@c 
28 
8c 
ea 
3b 
9 
8d 
21 
3d 
23 
74 
63 
7a 
ad 
3b 
ad 
3b 
7a 
se 
ea 
88 
bd 
ca 
o9 
f3 
ea. 
83 
7a 
8d 
da 
c9 
3kı 
3b 
ea 
3b 
7b 
8d 
a9 
4c 
40 
bd 
3b 
fo 
ds 
e6 
c9 
28 
36 


a3 
es 
a2 
19 
a8 
da 
ea 
fk 
3b 
fa 
da 
aa 
a4 
fa 
ea 
ee 
3b 
28 
ad 
26 
se 
83 
3b 
a9 
ad 
a4 
ea 
a3 
Sk 
4c 
af 
2a 
28 
28 
28 
21 
2@ 
21 
ea 
8d 
23 
v2 
sa 
7a 
ad 
3b 
ad 
Ik 
7a 
ge 
78 
Se 
3b 
79 
a2 
da 
ic 
aa 
aa 
a8 
ea 
4c 
Ik 
7a 
23a 
19 
a9 
ce 
40 
4c 
3b 
Tb 
ei 
so 
sa 
ib 
85 
12 
6d 
d9 
7d 
da 
c9 


a8 
e8 
ei 
da 
08 
f8 
ac 
kd 
35 
ad 
82 
39 
85 
ic 
ea 
Sc 
ad 
83 
&d 
ik 
3b 
2a 
ad 
aa 
[53 


"Sd 


ad 
4c 
ad 
a9 
2a 
20 
af 
c9 
ce 
9 
ce 
28 
ea 
7a 
ad 
3b 
ad 
3b 
7a 
3e 
76 
8e 
36 
77 
3b 
7b 
ae 
30 
88 
fb 
3b 
fa 
de 
88 
ad 
63 
c9 
Sb 
ee 
da 
ea 
7b 
sa 
&o 
c9 
3b 
8d 
23 
23 
3b 
d9 
eg 
4e 
85 
da 
03 


ei 







aa 
ed 
9d 
#7 


c8 
68 
59 
ib 
d3 
es 
e6 
78 
d9 
ea 
ea 
3b 
6c 
19 
36 
a9 
od 
95 
7e 
8d 
3b 
[22 
74 
a9 
2 
20 
og 
ce 
za 
94 
za 
85 
28 
44 
ad 
3b 
7a 
Se 
74 
Se 
3b 
75 
3k 
Tb 
ae 
3b 
ae 
3b 
Th 
a9 
a0 
od 
85 
ad 
82 
a9 
70 
22 
28 
ad 
‘7b 
18 
8d 


Sb» 


23 
24 
ei 
a9 
7d 
a9 
ad 
85 
ad 
ei 
3b 
d8 
83 
40 
da 









>2218 
>22229 
>2228 
>2238 
2238 
>224@ 
32248 
>2258 
>2258 
>2258 
>2258 
>2278@ 
>2278 
>2288 
>2288 
>2294 
>2298 
>2230 


>2238: 


>22k@ 
>2268 
>22c0B8 
>2208 
>22da 
>2248 
>22e8 
>22e83 
>22ra 
»22#8 
>2302 
>2398 
>231@ 
>2318 
>2320@ 
>2328 
>2338 
32338 
>2348 
>2348 
>2358 
>2358 
22368 
>2363 
>2378 
>2378 
>2334 
>2388 
>2398 
>2398 
>2338 
22338 
>23h8 
>2368 
>2308 
>2308 
>23de 
32348 
>23e8 
>23e8 
>23f8@ 
>23f8 
>24808 
>2408 
>2418 
>2418 
>2420 
>2428 
>2438 
>2438 
>2448 
>2448 
>2459 
32458 
>2468 
>2468 
>2479 
32478 
>24908 
>2488 
>2498 
>2498 
>2438 
>2438 
>24b@ 
>2468 
>24c8 


8d 
23 
23 
Th 
8d 
a9 
4c 
4c 
Sb 
7a 
2a 
19 
39 
7d 
4c 
4c 
3b 
7k 
ei 
sa 
68 
ib 
85 
78 
6d 
d9 
7d 
de 
c9 
Tb 
15 
8d 
ce 
8d 
3k 
81 
a9 
7d 
a9 
a2 
da 
io 
aa 
28 
a8 
e9 
ea 
7t 
28 
3b 
ad 
3b 
76 
Se 
33 
20 
3b 
ad 
3b 
7c 
se 
3b 
Sb 
ao 
ds 
d9 
c9 
sa 
ea 
$h 
da 
da 
od 
cd 
ad 
ad 
40 
3b 
3b 
sa 
7a 
18 
87 


7d 
a9 
ce 
3b 
7b 
ei 
sa 
68 
c9 
3b 
ee 
da 
ei 
3b 
se 
80 
og 
3k 
Sd 
23 
23 
Sk 
d9 
e9 
4e 
85 
da 
83 
ei 
Ik 
293 
Te 
7b 
To 
ce 
de 
ei 
3k 
ei 
oa 
fe 
3b 
fa 
da 
ea 
04 
ea 
3b 
2d 
8d 
8a 
8e 
3b 
si 
3b 
2d 
8d 
84 
Se 
3b 
85 
e3 
85 
ar 
a5 
88 
7d 
23 
ea 
sb 
ab 
83 
74 
75 
69 
6a 
d3 
da 
da 
ad 
3b 
8d 
25 


3k 
12] 
ra 
c9 
Sb 
8d 
23 
23 
ff 
ad 
7k 
18 
8d 
ce 
23 
24 
a1 
39 
7d 
a9 
ad 
85 
ad 
ei 
3b 
ds 
03 
40 
da 
ad 
18 
Ik 
3b 
Sb 
7k 
15 
8d 
ee 
8d 
ac 
bd 
35 
ed 
e2 
a9 
85 
ea 
Sd 
ei 
Te 
36 
7d 
ae 
3kı 
8d 
ei 
82 
Sp 
7d 
ae 
3b 
e8 
ds 
3b 
ds 
da 
de 
ea 
ea 
ad 
ad 
40 
3b 
3b 
3b 
3b 
24 
ad 
85 
72 
Se 
72 
ad 


ce 
8d 
36 
21 
39 
7d 
29 
ce 
da 
rd 
3b 
a9 
70 
7b 
a9 
ce 
da 
ei 
3b 
a1 
7k 
ds 
’a 
Sd 
5 
aa 
28 
sa 
2a 
7k 
Sd 
a9 
4c 
4c 
3b 
a9 
Te 
7b 
To 
7k 
ik 
da 
e6 
e6 
5b 
d9 
sa 
7c 
ad 
3b 
ae 
3b 
Td 
=) =] 
7o 
ad 
3b 
ae 
3b 
7d 
68 
88 
bd 
ca 
c9 
#3 
83 
ea 
ea 
69 
6a 
ai 
da 
de 
cd 
od 
ad 
ad 
4c 
3b 
7b 
Sk 
74 


7k 
70 
ce 
da 
aa 
3b 
aa 
72. 
S5d 
3b 
ad 
18 
Sk 
3b 
1 


Tb: 


15 
8d 
ee 
8d 
3k 
e& 
3b 
4e 
ds 
aa 
3e 
23 
ee 
Ik 
Tb 
aa 
sa 
sa 
ad 
e2 
3b 
3 
3b 
Sb 
3b 
ac 
d& 
d9 
31 
a9 
ad 
3k 
TG 
Se 
sı 
20 
36 
ad 
3b 
70 
Se 
85 
28 
3b 
a2 
de 


ic ! 


88 
ea 
aa 
29 
c9 
sa 
Sh 
3b 
24 
8b 
83 
76 
77 
69 
6a 
eo 
ae 
3b 
8c 
3b 


40 
40 
3b 
a9 
16) 
TR 
To 
ad 
[=]=] 
ei 
3b 
7k 
aa 
ea 
7c 
ad 
e2 
Sk 
3b 
Sk 
aa. 
ik 
aa 
35 
a2 
ds 
c9 
2b 
19 
a9 
7d 
39 
ee 
3b 
Tk 
81 
sa 
ea 
e8 
ds 
3k 
d8 
da 
a5 
31 
3k 
rd 
ae 
Ik 
8d 
21 
88 
3b 
7d 
ae 
3b 
Sd 
21 
84 
ac 
od 
85 
ed 
e2 
v1 
2a 
fe 
aa 
72 
73 
63 
Sa 
ba 
da 
de 
cd 
cd 
ea 
3b 
ea 
3b 
75 


.cI 


'e& 









sa 
sa 
ad 
a2 
Sk 
ei) 
3b 
7a 
8d 
de 













3b 
8d 






Sk 
7k 
ad 
a9 
4c 
4c 
bd 
Sk 
f8 
ds 
e6 
c9 
28 
3b 
ee 
da 
ei 
3b 
ei 
Ta 
c9 
3b 
8d 
23 
ea 
883 
kıcl 
ca 
c9 
f3 
d9 
da 
ae 
36 
rd 
[==] 
To 
ad 
36 
ae 
3b 
7d 
sa 
Te 
ad 
3b 
58 
ib 
d9 
e6 
e6 
ds 
40 
@5 
Sd 
3b 
sb 
sb 
3b 
24 
ak 
03 
78 
79 
ea 
8d 
aa 
40 
3b 






































































Compupbe mi 





22500 79 3b ea ea ea ea ea a2 


‚Ie6dA af af af af af af af af 






>2408 
>24d8 4c 87 25 ad 76 3b ac 77 
>24d8 3b Sd 7a Ik Sc 7b 3b a9 
>24e8 08 30 18 8d 76 3k Sc 77 
>24€e8 3b 4c @7 25 ad 78 3b ac 
>24f8 79 3k Sd 7a 3k Sc 7b 36h 
>24f8 39 Q@Q aQ 1a Bd 78 36 Sc 











32508 aa ac Th 3b eß e8 58 da 
>2518 fbk kd ik 3b 85 .d8 vd ic 
>2513 3b 85 d9 ac 7a 23k ca 98 
22520 fa Od e6 dS 35 dS c9 ea 
>2528 da @2 e& d9 88 de #2 a8 
22539 08 a9 20 91 d8 ea ea ea 
22538 40 f@ ic ea ea ea ea ea 
>254@ 3a 38 34 3a 37 35 08 oa 
72548 ad 48 25-cd 88 @c 39 3 
22550 da 3a ad 41 25 cd 89 8c 
>2558 98 35 da 38 ad 42 25 cd 
22568 Ba 8c 98 2b dA 26 ad 43 
22568 25 cd Ba @c 98 21 dA ic 
22570 ad 44 25 od Ob @c 98 17 
22578 da 12 ad 45 25 cd @c @c 
>2598 98 ad da 08 ad 46 25 cd 
>2598 Qd @c 98 03 4c 90 25 a2 
>2598 28 kd 88 Oo 9d 40 25 e8 
32598 e® 06 da #5 20 au 26 a2._ 
32530 00 kd d5 25 20 d2 ff e8 
32538 ed 25 dB #5 ea ea 39 08 
>25k0 aa a8 8d Ad 3b ea ea ea 
>25b8 ea ea ea ea e8 dB f6 c$ 
32500 da f3 ee 4d 33h ad Add 36 
32508 09 92 d@ e9 ea ea ea ea 
>25d0 ea ea 4c 22 28 a2 85 11 
32548 14 11 11 11 11 11 11 11 
>25e@ 11 id id id id id id id 
>25e8 id id id id id id id 47 
32578 41 4d 45 20 44 56 45 52 
>25f3 id 1d id id id BR ea ea 
>260@ 393 97 8d 11 ff a2 AR ka 
22608 48 25 9d le Gc e8 ea 86 
>2618 dA #5 68 ea ea ea 54 88 
>2613 86 4c 13 85 @d id id Ad 
>2628 id id Ad id Ad id c# b7 
>2628 k7 k7 b7 k?7 b7 b7? b7 kb? 
326368 k7 b7 k7 b7 b7 b7 b7 br? 
22638 b7 kb? b7 da Od Aid id id 
>2649@ id id Ad id id id k4 2a 
?2648 28 2a 2a 43 52 41 5a 59 
>2658 28 20 57 4 52 4d 53 28 
32658 20 20 20 aa @d Ad id id 
22668 id id id id id id oo a# 
>2668 af af af af af af af af 
I2670 af af af af af af af af 
>2673 af af af da Od Od Bd ad 
22688 id id id id Ad-1d Ad id 
32688 1d Sa 52 4 47 52 41 4d 
>2698@ 4d 45 44 20 42 59 20 46 
32698 52 41 4e 4b 28 4o 45 41 
>2638 Bd Ad id id id id 43 4 
22628 59 59 52 49 47 48 54 20 
>26ha 31 39 38 36 28 42 59 2a 
>26b8 54 52 4 de 49 43 20 56 
>26c8 45 52 40 41 47.0d af af 
>2608 af af af af af af af af 




























































>26d8 af af af af af af af af 
>eBeM af af af af af af af af 
>2688 af af af af af af Ad Ad 
>26fR0 20 20 208 20 29 20 29 46 
>26f8 31 3d 53 59 45 45 44 28 
>eTaa 2a 28 2a 20 20 20 2a 20 
>2708 28 46 32 3d 53 45 45 20 
>271@ 4b 45 59 53 29 28 28 8d 
>2718 Od 28 20 28 50 52 45 53 
>2728 53 28 4a 4 59 23 31 28 
Y2728 46 49 52 45 2a 4 52 ze 
22730 53 58 41 43 45 20 54 4 
22733 29 5a 4c 41 59 Bd Bd Aid 
>2742 id id id Ad Ad Ad id id 
32743 id id 53 58 45 45 44 8d 
>2759 c3 c3 c3 c3 03 03 02 c3 
32758 03 c3 03 c3 03 03 c2 083 
>2r76a 03 03 c3 63 03 c3 c3 c3 
22768 03 03 c3 c3 03 03 03 c3 
3ar7a 






















Compute mit — Sonderheft — 1/87 


programme 


>2353 3b 4c de 28 ad 8a 3b 09 
>easa OR da 08 39 398 Sd Sk 3h 
>2268 4c 52 28 c9 G1 da 08 39 
>237@ 15 8d 8b 3k da 52 28 09 
>2a73 @2 da 05 39 19 Ad Sk 3b 
>2a8a 4c 52 28 ea ea ea 39 30 
>2388 3d 8k 3b 39 EG Sd Sa 3b 
>239G ea ea 32 @8 kd a5 2a 9d 
>2393 hi 3e e8 eQ 38 da f5 4c 
>2aaald 22 28 ea ea ea Aa 06 208 
>2328 18 28 a8 20 28 aa 44 28 
>2aka ic 38 44 aA 00 62 66 3e 
>zah3 ic Te 7e 56 c2 62 ee 7f 
>2acQ0 Te ft Te 56 2 03 03 83 
>23-3 03 03 03 ff ff 42 30 Te 
>2ada Te Te Te 3c d2 ea ea ea 
>2ad8 ea ea ea ea ea ea ea ea 
EaeR a9 Ro 3d- 08 Sb a9 Bi Sd 
>Zae8 Ri 3b Bd Q2 36 a2 28 kd 
>2af@ 45 13 9d 83 3kh e8 eß 4a 
>2af8 da #5 39 Ba 8d 52 3b a9 
>ekaa 14 32 18 3d 67 Ik Se 68 
>2ka8 26 a9 Ba Ed 56h 2b a9 87 
Zk1A Sd 11 ff 39 GA Sd Qe ff 
>Eh13 33 ## Sd Gf ff a9 Te 8d 
>ekze 18 ff 29 Td Sd 18 dc Bd 
>Ekes 11 dc Bd 12 dc a9 OO 9d 
>2k3a &c 3b 3d 6d 36 Bd Ge Sb 
>2b33 Sd 6f 36 Bd Ta Sk Sad Fi 
>2b4@ 36 29 Qaa a2 1& 8d TZ 3k 
>Ekh48 Be 73 3k Sd 74 3b Se 75 
>2k5A 3b 8d 76 3b Se 77 Ik Bd 
>2h58 78 3b Se 79 36 39 Bi Sd 
>Zkea TC 3k Sd 7d Sk a9 aa Sd 
>2h68 S6 3b a9 20 Sd 89 3b a9 
>zkT7a 081 Sd Te 3h Sa 7f 3b Sıd 
>2k78 8a 3k Sd 81 3b Ad 92 3h 
>ehsa 8d 83 3b Sd 84 Sb Sd 85 
>Eb88 Ih a2 08 kd 48 25 9d ie 
>zb9a Go 28 eB G6 da f5 ea ea 
>2h98 ea ea ea ea ea ea ea ea 
>2kad a9 88 Ad Sc Ik ea ea ea 
>2kas a2 a8 a9 20 3d 5f 05 e8 
>2kka 


DEFTR 
>2730 
22728 
>27938 
22738 
»22728 
>2733 
yarke 
>27h83 
DaT7cA 
IErcR 
>27dAR 
>27a8 
>areQ 
>aTe8 
PI-ra 3) 
Y2Tf8 
>2sag 
22308 
2812 
2818 
>2820 
>2828 
>2330 
>2838 
>2848 
>2848 
>2358 
>2958 
>assa 
32363 
32872 
>2873 
>2338 
>2838 
3232A 
228398 
>28aG& 
>2838 
PZI=1=1=] 
>2868 
>28:8 
32368 
>23AR 
2843 e 
>28eR 


>28e3 
>a2astfa 
>28f8 1: 
29a 
>2943 
231 
>2313 
>2328 
>2928 
>293@ 
>2938 
>2942 
22343 
32250 
323583 
>23IE8 
>2968 
>2978 
>2978 
>2988 
329493 
32998 
>29983 
>29a0 
>2938 
>29hQ 
>29h8 
>29c8 
32908 
2I9da 
>2I948 
>29eB 
>2928 
>29f@ 
>23f8 
>2220Q@ 
>2393 
>2a1® 
>2a18 
>2220 
>2328 
>2320 
>2338 
>2340 
>2348 
>2358 



















































| Ein starkes Spiel 
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100%. Maschinensprache garan- 
tieren flotte Action auf hoher See. 
Ihre Aufgabe ist es, feindliche 
Schiffe und U-Boote mit. Ihren 
Torpedos zu versenken. 


Eingegeben wird dieses Pro- 
gramm über den eingebauten Ma- 
schinensprachemonitor ( M, RE- 
TURN). 


Das Programm belegt den Spei- 
cherplatz von $2000 - $3FFF. 


Gompube mib 


gestartet wird es mit SYS 13056 
oder aus dem Monitor heraus mit 
G 3300. 


Die Spielgeschwindigkeit laßt 
sich übrigens verringern oder er- 
höhen, indem vor dem Pro- 
grammstart in die Speicherstelle 
13197 ein anderer Wert gepoket 
wird (Die Werte können Sie 
leicht durch ausprobieren heraus- 
bekommen). 





programme | | | 


y22sa Ä 32523a Qi: 11a i ; $ 
32288 a : E 22538 
o 6) >22394 .: 5 32540 
Hier geht’s los 32238 51 se | 32sie | 
>2220 a: : 32558 31 a; I 5 
>2238 8: . . 22558 B 
ft ad a2 Fr >22b@ { : >2S56R@ Be: : \ i B 
: 85 c3 Y22b8 1 e0 >2568 Ä ; £ { 
28 .c9 77 >2200@ \ ! > »2570 
9 fh da 322-8 81 e2% 2 a a6 22578 
3 TE a3 322dR € . 86. >2538 
. 20 ea ea >22d8 s; . = 22588 
ds af >»2Zea 8 1 ff 8 32534 
a2 0R 34 Y>2228 2 : : 32538 
a9 41 81 >22+@ a 32520 
S1 34 3228 >2538 { 
aa >23a@ 34 4 : E >25ba 
>2253 81 d8 ds 32308 32568 
. JEASA 81 dR ea >22319 > . >25c@ 
>»2asS 43 da e: [2123 >2313 22508 
>2eaTa ds 2a 8 ea >22320 I25AA 
>2078 ed da e6 >2328 >2548 
>2esa de za 5,341 32338 >25eR 
229232 ea al a2 >2338 >25e8 
>293@ a1 8e 85 32342 >25f@ 
>2098 e4 35 e4 32345 2258 
>2ERaR 35 A9 zb >235A >yesaa 
>2B28 20 ae 3 ı ra oi >2358 328423 
>2Cka 5@ a9 a5 >2268 2618 
>2068 e4 38 e5 >2358 ea c >2618 
>2dcQ e9 5 e5 a: 3 20 3237@ 22 c .d 2 j )2628 
>2ac8 da a7 a 1 e4 22378 . 3 3 32628 . \ 
>zAdea 6Q ea c® : ag »2320 3: 4 2632 c N ; ; 
>20948 21 c9 3 21 32238 a \ \ i >2638 
>2ReR c9 53 c3 32238 2a c >2648 
>zGeS 54 dB e: @c >2398 ; >2648 : 5 ' 
»2afR 21 ae 2: { 69 32338 >2658 
>20f3 60 aa aa 32328 >2658 
>»z1aa 22 ga : . a2 >23b@ 2660 
>2108 ea 81 . e4 I236R 32668 
>z11a e4 da 3 e6 >223c2 >2672 
>z118 da e4 da 27 32308 | 22878 
>2i12a es da i 2a >22dR i >2680 & 
>2123 27 e6 da 3 4c 32348 £ i ; 226883 . ; i 
»212a ea 27 . ea a6 >23e@ : >25382 1a iz 4 | 
>2138 e4 ed de k : 19 27 >23=8 >2838 
>214R e6 ; : 19 32374 >2653@ > | 
32148 27 e& de > 40 23483 32628 9 4 B : : v 





>zaca 39 fd 
>22a2 c9 Th 
>2aia fr da 
>201S da a3 
>D2eza a3 2a 
>26028 40 85 
>za3a ea 60 
>2033 85 d9 
>za4a ds 81 
>2048 dS e& 
>2asa dS 60 


oa» a2 ne» nmnkmıXın 
IVO SDRANn Wan 


BDNnNWWDW m L 


on iD 
VOM DM MM 


>2158 19 27 ; > 83 2438 { >z5k& 


2158 4c 19 3 a4 3248 25 1f ; >2668 
>zi6a_de a6 3 40 >241a Y)26c0 5 i 
32168 33 27 a3 32418 2 : : 22608 
321ra 4c da 242m 2: . | >26d@ 
2172 03 4c 3: de 32428 7 \ ‚22648 
21ER dia : ea 32428 >26eQ 
2138 ea a4 u da 32438 32688 


>219A 4C ea >2442 
>E128 dB 93 Sc e4 >2443 
>2128 ea de > ea 32458 
>21a8 e4 ea ; 34 32458 
>21kQd eQ ea e4 2469 
>21k8 e2 da &: : e2 32468 
>21ca e4 e2 c6 >2478 
32108 e2 e4 e 27 32478 
>21dA e6 e2 65 >2488 
>2id8 27 84 8d 32488 
>21eBd ak 31 31 32498 
>21e8 8d 18 >24398 
>zifa 31 8d ea 32424 
»2ifs 22 46 + >2438 
>2200 a9 2a i da >24h68 
>2208 e6 da da >2468 
>221@ e6 da a3 >2408 
>2213 43 a2 a9 >2408 
»2220 44 e6 4 e6 >24dR 
>2228 da 81 sı >24d8 
>2220 da 84 ; 9a >24e8 
>2238 a4 de de >24e8 
>2249 e6 de de 248 
>2248 84 dc a4 >2448 32738 , 
>2250@ de 81 81 >2508 Y2ThR n 
>2258 de 39 a9 »22508 >27K8 r 
>2268 4b e6 sa >2519 ® 32709 | 
>2263 98 a9 81 >2518 >2708 | 
>2278 de e& 81 >2520 


>27dA8 
32278 de e6 68 >2528 32748 


»26r@ 
>26+8 

>zran 

>27a8 

»2r1a : 

>27183 

»2r2a 

>2728 

>2738 

>2738 

>2748 

32748 

>2758 

32758 

>2r7ea 

32768 ee 
>2778 4 
>2778 6 
>273a | 
32788 

32738 

32738 

>2734 
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programme 


>2398 
>233983 
>2a20 
>2aa8 
>2ab® 
>23b8 
>22c8 
>2308 
>2ada 
>22d8 
>2ae8 
>2ae8 
>2af8 
>22f8 
>2nae 
>2693 
>261@ 
>2n18 
>2b28 
>2k28 
>2k3@ 
>2633 
>2b44 
>2648 
>2k5@ 
>2558 
>2b68@ 
>2k68 
32679 
>26H78 
>2h88 
>2683 
>2k98 
>2k498 
>2kaa 
>2ba8 
>2kke 
>2kh8 
>2bcA 
>2hbc3 
>2bd8 
>ekd8 
>2kenR 
>2be 
>2bf8 
>anf8 
>2cad 
>2098 
>2c18 
>2c18 
>2c20 
>2028 
32-38 
>2c38 
3240 
>2048 
3250 
3253 
>2c6@ 
22069 
>2c78 
>2c78 
2282 
>2c83 
>2c96 
32098 
>2cad 
>2ca8 
>2chd 
>2ck8 
>2ccA 
>2cc8 
>zcda 
>20d8 
>2ceB 
>2ce8 
>220f8 
>2cf8 
>2daa 
>2da8 
>2d1B8 
>2d18 
>2d28 
>2d28 
'>2438 
>2439 


>27e@ 
>27e8 
>27f8@ 
278 
>2808 
>2808 
>2318 
>2818 
>2828 
>2823 
>2538 
>2838 
>234@ 
32348 
>2858 
>2858 
>2868 
72368 
>287@ 
328378 
>22388 
>2838 
>2298 
>2893 
>29238 
>2838 
>286@ 
>2868 
>2308 
>2808 
>22d8 
>2849 
»>29eA 
>2888 
>28f@ 
>28f8 
>2908 
>2988 
>2919 
>2918 
>2928 
>2928 
>2939 
>29383 
>2348 
>2348 
>2358@ 
32958 
>23968 
>2368 
>297@ 
32978 
>2388 
>2998 
32998 
32998 
>2928 
>29338 
>23b@ 
32968 
>22c0 
>2908 
>29d8 
>29d8 
>29e8 
>29e8 
>29f0@ 
>29f8 
>2308 
>2388 
>2318 
>2318 
>2a20a 
>2328 
>2338 
>2338 
>2348 
23483 
>2258 
>2358 
>2368 
>2368 
>2a78 
>2a78 
>2288 
>2388 
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Programme 


>2ff8 
>2aff3 
>3998 
>3088 
>2218 
>3918 
>3928 
>3928 
>3939 
23038 
>3848 
73948 
23958 
230858 
>3068 
>3a68 
>3978 
>3978 
»3282a 
>34838 
>3a98 
33033 
>30a8 
>39a8 
>39k@ 
>38b8 
>38c8 
23908 
>232d8 
>32d8 
>30e8 
>39e8 
>30af8 
>39f3 
>3108 
>3108 
>311@ 
33118 
>3129 
>3128 
->3130 
>3138 
>3148 
>3148 
33158 
23158 
>316@ 
23168 
»2317@ 
>3178 
>3188 
>3198 
>3198 
>3198 
>31a0@ 
>3138 
>31b8 
>3168 
>31c@ 
>31c8 
>31de 
>3148 
>31eQ 
I31e8 
>31f8 
>31f8 
>3220 
23208 
>321@ 
>3218 
>322@ 
>3228 
>3238 
>3238 
>3248 
33248 
23258 
23258 
>3260 
33268 
>3270 
>3278 
>3288 
>3288 
>3298 
23298 


08 
08 
ae 
13 
e? 
e6 
69 
da 
8d 
4c 
a8 
32 
c9 
12 
da 
17 
81 
e6 
e6 
e6 
8d 
da 
83 
4c 
a2 
a8 
aa 
88 
ff 
ff 
ea 
ea 
ff 
ff 
ei 
aa 
aa 
=l=] 
ad 
ff 


2a 
oa 
oa 
ff 
ea 
3c 
ff 
8d 
ea 


8a 4 


a2 
ae 
31 
a9 
85 
a2 
88 
da 
d8 
aa 
e6 
86 
e8 
aa 
86 
a9 
81 
ca 
Se 
32 
33 
23 
oa 
a2 
si 
1-13 
ae 
s1 
8a 
80 
da 
20 
si 
e6 
e6 





>3228 
>3238 
>32b8 
>32b8 
»32ca 
23208 
>32d@ 
23248 
>32e8 
>32e8 
>32f8 
>32f8 
>338@ 
>3308 
>331a 
>3318 
>3328 
>3328 
33338 
23338 
>3344 
>3348 
>3358 
>3358 
>3368 
233658 
»3370 
23378 
>3380 
33338 
>3398 
>3398 
>33a0 
>3338 
>33 
>3368 
>233c@ 
>323c8 
33348 
>3348 
>33e8 
233e8 
>33f@ 
>33f8 
>3498 
23493 
>3410 
23413 
>23420 
>3428 
>3438 
23433 
>34408 
>3448 
23450 
>23458 
>3468 
23468 
>3470 
>3478 
23480 
>34988 
>34909 
23498 
23430 
>3438 
>34 
>3463 
>34-@ 
>34c8 
23442 
>34d3 
23420 
>34e8 
>34f8 
>34f8 
>3528 
>3593 
>351@ 
>3518 
>3528 
23528 
23534 
23538 
>3548 
>3548 
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23558 
23558 
>3568 
235683 
>3578 
>3578 
23588 
>35883 
>3590 
23598 
235308 
>35a8 
>35b8 
335683 
>35c8 
23508 
>35d8 
>3548 
>35e8 
>35e8 
>35f8 
>235f8 
>3608 
>3628 
>3618 
>3618 
>3628 
>3628 
>3638 
>3638 
22640 
>23648 
>36858 
>3558 
>36504 
23668 
>3678 
>3678 
>3538 
236983 
33698 
236893 
>3624 
>3638 
>366R 
>23668 
>36cA 
>36c8 
>36dA 
>36ch8 
>36eR 
>36e8 
>36r0 
>36f8 
>3700 
23798 
33718 
>3718 
>3720@ 
23723 
>3738 
>3738 
>374q 
>3748 
>3758 
>3758 
>37688 
23768 
I377& 
I3778 
>3782 
>23788 
»373@ 
>3798 
>3raa 
>3733 
37h 
23763 
>37cQ 
>237c8 
>37d2 
>3r7A8 
>37e8 
>27e8 
>237f8 
>37f8 
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ee 


>28a8 
>23323 
>3814 
>2218 
>3820 


1 33828 


33332 
22838 
2324 
>32343 
>3259 
>23358 
33868 
2 >3363 
ä 33370 
>3378 
>3884a 
238838 
23398 
‚3898 
>383@ 
>28a8 
>338h@ 
>38h8 
>323c0 
>3828 
223348 
H 33248 
n >38e8 
.238e8 
>33rA 
>38f8 
>299Q@ 
>3903 
>3310 
233918 
23928 
>3928 
>3938@ 
>3938 
>3948 
23343 
>3950 
339253 
>3958 
23958 
>37 
23978 
3932 
j >3988 
j >33998 
23938 
j >3934& 
n >39a8 
; 2368 
>33h8 
339-8 
23908 
398 
23948 
>39eQ@ 
>33e3 
>39f8 
2398 
>3208 
>3a08 
>3318 
>3218 
>3228 
1 >3323 
| >3338 
j >3338 
j 23248 
>32.48 
>3358 
23358 
! >3asd 
N >3358 
i >3ara 
j >3a78 
; >3asa 
i 33288 
h 33398 
23393 
>3338 
h >3338 


ZT vr 
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>3ahl 
>32h5 
>3ach 
>3ac8 
>33.d4 
>33.d8 
>33e8 
>3ae8 
>3af& 
>3af8 
>3508 
>28 
>23b1@ 
>3b18 
>2h2@ 
>3h28 
>3h30 
>3638 
>3b44 
>3648 
>3k5a 
>3k58 
>3k6a 
>3h68 
>3Kr7Q 
I3h78 
>3K8a 
>3K88 
>39 
>98 
>3kad 
>3ha8 
>3-ka 
>3kkS 
Inc 
>Ikc® 
>akcdda 
>3kd8 
>Ikef 
>3hes 
>3kf8 
>akrs 
>23:00 
>3c08 
>3c1a 
>3c18 
DIcza 
>3:28 
>3c30 
>33 
>34 
>3:48 
>3c5Q 
>3058 
>38 
33068 
>3cra 
>Ic78 
>3082 
23088 
33:98 
>3098 
>23cad 
>3038 
>3che 
>3ck8 
>3c0R 
>30c8 
>3cd9 
>38 
>IceR 
>2ce8 
DIcfR 
>3C#8 
>3dacı 
>23 
3418 
318 
Dadza 
>3d28 
>2d3@ 
323438 
>3d4a 
>23448 
>3a5a 
334583 
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programme 


>2d6B 
I34E8 
>3d478 
23478 


>3488 
>3428- 


23438 
>3498 
>2daß 
>3das 
>admea 
>3Ah8 
>30 
>I3dc8 
>3dda 
>3da8 
>2deB 
>3de8 
>aara 
>I3df8 
>Ze22 
>3e93 
>23e12 
>3e18 
»>3e2a 
>3e28 
I3e3A 
>3e38 
>3e449 
>23e48 
>3e50 
>3e58 
>3e6A 
>38e68 
>3er8 
>3e78 
>3e80 
>3e88 
>3e9a 
>3e33 
>3ead 
>3ea8 
>3ekf 
>3ek8 
>3ech 
>3ec3 
>3eda 
>3ed8 
>3eeH 
>3ee8 
>IefQ 
>3ef% 
>3fo@ 
>3f083 
>3f10 
>3#18 
>3f20 
>3f283 
>33@ 
>3f38 
>3f4@ 
>3f48 
>3f50 
3358 
>3rsA 
>3468 
33708 
334783 
>3f88 
>3f88 
>3f98 
>3f98 
>3faa 
>3fa8 
>3fKa 
>3fh8 
>3fc8 
>38 
>38 
>3fdS 
>3feR 
>3fe8 
>atrfa 
>3ff8 
>4008 





programme 












































»Los, los — Kohle raus«, brüllt 


RICH FREDDY 








Bei diesem Spiel sind Sie ein Gel- berühren darf. Ist diese Zahl null | 230 para ‚00,B1,E6,60,85,E7,18,20 <82> 
deintreiber, genannt Freddy. oder sind sie mit einem Wesen, er a OEL en 
= ‘ ” = . E} ’ ’ s ’ °F sv 
Aber da Freddy zu ängstlich ist, das sie vom Geld abhalten soll, | 555 para 3C,E6,D4,A6.D4.A4.D5.20 <223> 
in jedem Haus um das Geld zu zusammengeprallt, so verlieren 330 DATA 4D,3C,C9,20,F0,16,09,45 <244> 
kämpfen, steuert er ein fernge- Sie eines Ihrer 5 Versuche in allen | 330 para D0,07,A9,01,85,D1,4C,C4 <200> 
steuertes UFO mit dem er das 4 Häusern. das Geld einzusam- | 350 DATA SC,A5,D2,85,D4,A5,D3,85 2702 
Geld einsammdli, Ihre „Aufgabe mein 360 DATA DS,EA,EA,EA,AI,48,8D,3B 3 <12> 
: : Kalten . 370 DATA 05,49,6N,A4,D4,A&,D5,4C <230> 
ist es nun das UFO so zu steuern, : 380 DATA 8C,3C,A2,00,B5,D6,85,D2 " <20> 
daß es nicht mit anderen Dingen, Den Spielablauf können Sie mit | 390 DATA B5,D7,85,03,B5,D8,85,D4 <60> 
z. B. Spinnen zusammenstößt. SHIFT bzw. SHIFT LOCK an- | 400 DATA B5,D7,85,05,86,E5,20,98 
Das UFO darf auch nicht beliebig halten. Zum nächsthöheren Level en en Se 
- .. .. * . ” ni Ki ’ , Ei L} E3 
oft die Mauern des Hauses berüh- (nächstes Bild) kommen Sie, in- | 430 para D5,95,D97,E8,E8,E8,E8,E0 <82> 
ren. Am unteren Bildschirmrand dem Sie RETURN drücken. 440 DATA 0C,D0,D1,60,AD,43,05,F0 <95> 
steht wie oft man noch die Mauer 450 DATA 03,4C,04,3D,60,49,20,A4 <212> 
BEZEEE 460 DATA E2,A6,E3,20,80,30,06 ,E3 <177> 
C-16 LISTING + CHECKSUMMEN (DE V1.0) 470 DATA A&,E2,A4,E3,20,4D,30,C9 <126> 
480 DATA 20,F0,26,C9,45,D0,07,A9 <198> 
10 REM <153> | 490 DATA 01,85,D1,4C,75,3D,C9,46 <129> 
20 ’REM *#* RICH FREDDY *** DATA PART #x* <234> | 500 DATA FO,F5,AD,16,3D,C9,C6,FO <146> 
30 REM <173> | 510 DATA 08,A9,C6,8D,16,3D,4C,16 <104> 
40 REM <183> | 520 DATA 3D,A9,E6,8D,16,3D,4C0,16 <173> 
50 SENCLR:COLORO, 1:COLOR4, 1: CHAR, 13,10," tYELLON} 530 DATA 3D,C6,E2,6,E2,A4 ,E3,20 <123> 
PLEASE{SPACE3IWAIT. .. <60>. | 540 DATA 4D,3C,C9,20,F0,1F,C9,45 <231> 
60 POKESS ‚255: POKES6 ,55:CLR <135> | 550 DATA FO,CD,C9,46,F0,69,AD,49 <244> 
70 FORL=15360T016167:READT$: POKEL „DEC(T$) :NEXT <82> | 560 DATA 30,C9,C6,F0,08,49,C6,8D <189> 
80 SYS16136 ' <249> | 570 DATA 49,3D,4C,49,3D,A9,E6,8D -£67> 
90 FORL=14856T0151517READT$:POKEL,DEC(T$) :NEXT <60> |580 DATA 49,30,4C0,49,3D,A9,&4B,8D <29> 
100 PRINT"{CLEAR BLACK DOHN2}L{S0O}"CHR$ (34) "RICH 590. DATA 38,05,A9,71,A4 ,E2,N&,E3 <179> 
{SPACEYFREDDY{SPACEIP. 2"CHR$ (34) 5 <140> | 600 DATA 4C,8C,3C,A9,00,80,3B,05 <100> 
110 PRINT" „8“: PRINT" DOHN4IRUNCHOHEI" 3 :POKE1319, 610 DATA A9,79,A4,E8,A6,E9,20,8C <11> 
15: POKE1320,13:POKE239,2 : <69> | 620 DATA 3C,C6,E9,A&,E8,A4,E9,20 <233> 
120 DATA AD,2B,3A,C9,9D,D0,0B,A9 <56> | 630 DATA 4D,3C,C9,59,F0.14.AD.91 <92> 
130 DATA B7,A2,76,8D,2B,3A,8E,33 <110> | 640 DATA 30,C9,C6,F0,08,A9,C6,8D <13> 
140 DATA 3A,60,49,9D,A2,DE,4C,0B <159> | 650 DATA 91,3D,4C,91,3D,A9,E6,4C <232> 
150 DATA 3C,A2,18,A0,12,18,20,F0 <87> | 860 DATA A7,3D,A9,78,04,E8,A6,E9 <173> 
160 DATA FF,A9,05,20,D2,FF,C&,DO <1> &70 DATA 20,8C,3C,A5,E9,C05,F8,DO <149> 
170 DATA A&,D0,D0,09,A9,01,ER,EA <128> | 680 DATA 04,A5,FE,F0,01,60,49,01 <77> 
180 DATA EA,EA,EA,85,D1,A9,00,20 <244> | 690 DATA 85,FE,A6,E8,CA,B6,F5,A4 <240> 
190 DATA SF,A4,A9,20,4C,D2,FF,A2 <151> | 700 DATA E9,84,F6,4C,E5,3D,A9,20 <171> 
200 DATA 00,A0,00,EE,15,FF,E8,DO <154> | 710 DATA A4,F5,A6,F6,20,80,30,C6 <171> 
210 DATA FA,CB,DO,F7,60,86,E6,84 <79> | 720 DATA F5,A6,F5,A4,F6,20,4D,3C <38> 
220 DATA E7,A0,28,20,81,94,20,91 <94> | 730 DATA C9,20,F0,10,09,46,D0,07 <130> 
230 DATA A2,A4,E7,20,81,9A,20,7B <98> | 740 DATA A9,01,85,D1,4C,FC,3D,A9 <5> 
240 DATA A0,20,91,A2,N4 ,E6,20,81 <90> | 750 DATA 00,85,FE,60,A9,00,8D,3B <186> 
250 DATA 9A,20,9E,9E,20,91,A2,A9 <120> | 760 DATA 05,49,7A,A4,F5,A6,F6,4C <221> 
260 DATA 0C,85,62,49,00,85,63,42 <100> | 770 DATA 8C,3C,A9,FB,8D,08,FF,AD <178> 
270 DATA 90,38,20,CE,A2,20,9E,9E <198> | 780 DATA O08,FF,85,03,6N,90,0E,6A <152> 
280 DATA 20,E4,9D,84,E6,85,E7,A0 <105> | 770 DATA 90,10,6R,90,12,65R,90,14 <114> 
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800 DATA AS,04,4C0,12,3E,06,F8,4C : <25> 60 REM"{SPACE2 S- SPACE43WRITTEN{SPACEIBY{SPACES 
810 DATA 36,3E,E64,F8,40,36,3E,C6 <87> SE <211> 
820 DATA F7,4C,36,3E,E6,F7,A6,F7 <120> | 70 REM" £SPACE2 S-3-—---------------——- XS- <248> 
830 DATA A4,F8,20,4D,3C,C9,20,F0 <174> | 80 REM"{SPACE2 S- SPACE2IOLIVER{SPACE2YDANGEL{SP 
840 DATA 66,EA,A2,08,DD,32,03,F0 <a5> ACE3 S- <209> 
850 DATA 1A,CA,DO,F8,C9,50,F0,21 <76> | 90 REM"ISPACE2 S- SPACEZIRIESBERGSTR.37{SPACEZ S 
860 DATA C9,56,F0,3B,C9,57,F0,49 <253> | - <70> 
870 DATA C9,45,F0,4B,C9,46,F0,47 <180> | 100 REM"{SPACE S- SPACE2Y7157{SPACE}MURRHARDTISP 
880 DATA 4C,E4,3E,20,19,3C,A5,F9? <244> | acka S- <55> 
890 DATA A6,FA,85,F7,86,F8,4C,DB <158> | 110 REM"{SPACE SJ S*#19 SK <81> 
900 DATA 3SE,AS,FC,18,69,01,85,FC <228> | 120 COLORO,7,3:COLOR4,1:SCNELR <34> 
910 DATA A9,63,8D,3B,05,A0,09,A2 <242> | 130 V=652803 POKEV+1B, 192: POKEV+19,56 <115> 
920 DATA 00,18,20,F0,FF,A93,00,A6 <81> 140 POKEV+7 ,24:PRINTCHR$ (8) 3 <197> 
930 DATA FC,20,5F ,A4,4C,A7,3E,A4 <228> | 150 POKEV+22,0:POKEV+23, 119: POKEV+6, 11 <181> 
940 DATA F7,C8,A9,20,A6,F8,20,8C <139> | 160 PRINTTAB(18) "{DOHN HHITE S# C- S-}r <232> 
950 DATA 3C,A5,FC,18,69,0A,40,76 <117> | 170 PRINTTAB(17)"(C= SHIFTSPACE CK CL CT Ca <88> 
960 DATA 3E,A4,F7,88,40,92,3E,A5 <73> 180 REM #nunneeee ° SHIFT SPACE #raR0ReH <158> 
970 DATA FD,DO,07,E6,FD,E6,F7,4C <206> | 190 PRINT"{DOHN2 ORNG SPACE. SU3 SPACE SU SPACE S 
980 DATA 36,3E,C6,F7,A9,20,A4,F9 <200> | 43 SPACE SU SPACE SU SPACE2 SU3 SPACE, SU3 SPACE 
990 DATA A6,FA,20,80,30,20,D2,FF <137> | SU3 SPACE SU2 SPACE2 SU2 SPACE2 SU SPACE Su <51> 
1000 DATA A9,6D,8D,3B,05,A9,65,A4 <168> | 200 PRINT"{SPACE SU SPACE SU SPACE SU SPACE SU S 
1010 DATA F7,A6,F8,20,8C,3C,49,66 <37> | PACEZ SU SPACE SU SPACE2 SU SPACE3 SU SPACE SU S 
1020 DATA 20,D2,FF,A5,F7,A6,F8,85 <193> | PACE SU SPACE3 SU SPACE SU SPACE SU SPACE SU SPA 
1030 DATA F9,86,FA,A5,03,85,04,49 <198> | CE SU SPACE SU <21> 
1040 DATA 00,85,FD,60,A9,01,85,D1 <155> | 210 PRINT"({SPACE SU3 SPACE SU SPACE SU SPACE3 SU 
1050 DATA 4C,A7,3E,A2,00,A0,09,A9 <234> | 3 SPACE2 SU3 SPACE SU3 SPACE SU3 SPACE SU SPACE 
1060 DATA FB,8D,08,FF,AD,08,FF,C9 <80> | SU SPACE SU SPACE SU SPACE SU SPACE SU <133> 
1070 DATA FF,FO0,04,C5,04,D0,06,CA <193> | 220 PRINT"{SPACE SU2 SPACE2 SU SPACE SU SPACE3 S 
1080 DATA DO,ED,88,DO,EA,4C,OA,S3E <49> | U SPACE SU SPACE2 SU SPACE3 SU2 SPACE2 SU SPACE3 
1090 DATA A2,00,BD,00,D0,9D,00,38 <247> | SU SPACE SU SPACE SU SPACE SU SPACE2 SU <87> 
1100 DATA BD,00,D1,9D,00,39,BD,00 <180> | 230 PRINT"{SPACE SU SPACE SU SPACE SU SPACE SU3 
1110 DATA D2,9D,00,3A,BD,00,D3,7D <231> | SPACE SU SPACE SU SPACE2 SU SPACE3 SU SPACE SU S 
1120 DATA 00,3B,CA,DO,ES,60,00,00 : <234> | PACE SU3 SPACE SU2 SPACE2 SU2 SPACE3 SU <241> 
1130 REM BRENNER <37> | 240 PRINTTAB (6) "{DOHN2 BLACKITCOPYRIGHT {SPACEI1FB 
1140 DATA 00,01,02,C2,C0,C0,02,32 <8> 6{SPACEIBY{SPACE HWHITEYANGEL-SOFT <100> 
1150 DATA 50,54,D4,A4,A0,50,A8,58 <5> 250 PRINTTAB(9)"{DOHNZ BLACK SG <220> 
1160 DATA 36,15,16,12,00,00,00,01 <105> | 260 PRINTTAB(9)"{L.BLU SE SF SPACEI8 SE SF}Y" <175> 
1170 DATA 58,68,AB,A8,A0,50,50,50 <50> 270 PRINTTAB(9) "{BLACK SH <15> 
1180 DATA 00,02,2A,9D,2A,00,01,00 <255> | 280 PRINTTAB(B) "{DOHN3 WHITE>YPRESS{SPACE BLACKYIF 
1190 DATA 00,80,A8,DE,AB,00,40,00 <87> IRE{SPACE WHITEITO{SPACEISTART{SPACEIGAME <185> 
1200 DATA 7E,18,7E,3C,18,00,00,00 <221> | 290 FORL=1T08:READT:POKEB18+L,T:NEXT <74> 
1210 DATA 00,00,00,18,3C,7E,18,7E <221> | 300 DATA45,66,67,68,77,78,79,89 <109> 
1220 DATA 3C,AA,96,AA,24,18,24,18 <58> 310 POKEV+6,27 ° <217> 
12350 DATA 00,28,BE,28,00,00,00,00 <246> | 320 T$="{SPACE1IT SV SH SPACEIRICH{SPACEYFREDDY{S 
1240 DATA 00,90,98,FC,FC,98,70,00 <196> | PACEIIS{SPACEIWRITTEN{SPACEIBY{SPACE}D. DANGEL{SP 
1250 DATA 00,09,19,3F,5F,19,07,00 <169> | ACEIAND{SPACE} (C) 1IB6LSPACE>IBY <52> 
1260 DATA 55,7F,7F,7F,55,7D,7D,7D <75> | 330 T$=T$+"(SPACEIANGEL-SOFT{SPACE SV SU SPACEIU 
1270 DATA 55,DF ,DF,DF,S5,FD,FD,FD <17> | SELSPACEYJOYLSPACEILSPACEITOLSPACEIPLAYTSPACEIB 
1280 DATA 55,DD,DD,DD,S5,FD,FD,FD <230> | UTESPACEIDON 'TISPACEIFORGET TSPACEITOLSPACEILOOKE 
1290 DATA FF ,E7,C1,97,C03,E9,83,E7 <55> | sSpAcEraur er <44> 
1300 DATA 00,28,96,AA,76,28,5C,FF <222> | 340 T$=T$+"{SPACEIFORLSPACEFHOTHER{SPACEIGAMESTSP 
1310 DATA 00,18,05,1B,67,0C,13,64 <223> | ACEIFROM{SPACEIANGEL-SOFTCSPACE SV SH SPACEI" <19> 
1320 DATA 80,8C,D0,EC,F3,98,64,13 <30> | 350 FORL=1TDI6GHSYS15360 — gen <254> 
1330 DATA 80,80,80,80,80,80,80,80 N <126> | 360 M$=MID$(T$,L,18) <140> 
1340 DATA 15,15,49,A9,R9,A9,A9,AB <44> | 370 CHAR,11,17," CYAN} "+M$ <156> 
1350 DATA FF,EC,CB,AB,EB,EB,EC,FF <162> | 380 FORM=0T015 <59> 
1360 DATA FF,E7,43,57,45,6B,C3,E7 <152> | 390 IFJOY(1)=12BTHEN410 <66> 
1370 DATA 7B,19,3B,F9,FB,37,1B,77 <57> | 400 NEXTM,L:GOTO350 <118> 
1380 DATA 03,01,03,01,03,01,03,01 <92> 410 BI=1:TR=5: POKE252,0 <40> 
1390 DATA 00,00,00,6E,6E,00,00,00 <103> | 420 SCNELRsPOKEV+6, 11 <a1> 
1400 DATA 00,00,03,07,0E,1F,38,7C <56> | A350 G0SUB780: ONBIGOSUBB80, 1130, 1400, 16601 POKE208 
1410 DATA EO,FO,70,38,39,DE,3F,7F <21> | ,p <74> 
1420 DATA 01,03,07,F7,E3,00,FF,FF <53> | 440 FORL=21410222STEP4:POKEL+2,PEEK(L) ı POKEL+3,P 
1430 DATA FF,FE,80,F0,F8,78,F0,EO <156> | EEK(L+1) sNEXTs POKEV+6,27 <208> 
1440 DATA 00,00,0F,09,09,0F,08,08 <121> | 450 POKE4,2513POKE209,0: POKE253,0: POKE254,0 <50> 
1450 DATA 00,00,7B,4N,4A,7B,52,4B <52> | 460 VOL& FORL=680T07808TEP2: SOUNDS ,L. „23 NEXTa FORL 
1460 DATA 00,00,3D,21,21,BD,05,FD <214> | =1T0300s NEXT: VOL2 <162> 
1470 DATA 00,00,93,1A,1E,D6,12,F2 <149> | 470 REM ##* MAIN LOOP rettete <207>. 
1480 DATA 00,00,FF,48,48,4F,41,7F <140> | 480 5Y816107: ONPEEK (209) G0T0570: SOLUND3,780,D <186> 
1490 DATA 00,00,00,30,00,00,50,00 -  <91> | 490 IFBI=3STHENSYS15629: ONPEEK (209) 6010570 <70> 
1500 DATA CC,CC,33,33,CC,0C,33,53 <120> | 500 5Y51536015Y815570: DONPEEK (207) 6010570 <227> 
' ENDE DES LISTINGS ; 510 8Y515620 <144> 
> | 520 IFBI<>1THENSYS1574710NPEEK (209) GOT0570 <249> 
530 IFPEEK (254) =1THENSYS15830s0NPEEK (209) 6010570 <249> 
540 ONPEEK (198) 6010750 <84> 
550 G0T0480 <129> 
560 REM ### FAILED #000 HERR <213> 
570 SOUND3,500 ‚260: FORL=8TO1STEP-11VOLLSSYS154235 
C-16 LISTING + CHECKSUMMEN (0C V1.0) s:NEXT:PRINT" CHOHEY" <57> 
580 TR=TR-13 IFTR<>OTHEN420 <212> 
10 REM"{SPACE2 SU S#19 SI <71> 590 REM. ### GAME DVER Kann HHER HR <9> 
20 REM"{SPACE2 S-I>>>1SPACEIRICHTSPACEIFREDDY{SP 600 PRINT" {HOHEI"TAB(9) "{DOHNS SPACE227" <75> 
ACEI<<S<LS- E <41> | 610 PRINTTAB(F)"ORNG SPACE2 SU4 SPACE2 SU2 SPAC 
30 REM"{SPACE2 CQ@ S#19 CH <99> | E2 SU SPACEZ SU SPACE SU3 SPACEI“ <177> 
40 REM" tSPACE2 S-I CI) SPACE} 19B61SPACEIANBEL-SOF 620 PRINTTAB(9P) "SPACE SU SPACES SU SPACE2 su sp 
TIS- <148> | ACE SU2 SPACE SU2 SPACE SU SPACE3}I" <90> 
50 REM"{SPACE2 S- SE19 S- <28> 630 PRINTTAB(F)"ISPACE SU SPACE SUZ SPACE SU4 SP 
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62 


. 1100 


ACE 
640 
CE2 SU SPACE SU SPACE3 SU-SPACE SU SPACE3}" 

650 PRINTTAB(F)"{SPACE2 SU3 SPACEZ SU SPACE SU 
SPACE SU SPACE3 SU SPACE SU3 SPACE}" 

660 ERINTTRE ee " 

670 PRINTTAB(F)"{SPACE2 SU3 SPACEZ SU SPACE3 SU 
SPACE SU3 SPACE SU3 SPACE2}I" 

680 PRINTTAB(F) "(SPACE SU SPACEZ SU SPACE SU SPA 
CE3 SU SPACE SU SPACE3 SU SPACE2 SU SPACE}I" 

690 PRINTTAB(9) "SPACE SU SPACE3 SU SPACE SU SPA 
CE3 SU SPACE SU3 SPACE SU3 SPACE2}" 


SU SPACE SU SPACE SU SPACE SU3 SPACEI” _ 
PRINTTAB(9) "SPACE SU SPACE3 SU SPACE SU SPA 








720 PRINTTAB (9) "(SPACE22Y" 

730 FORL=0T03000: NEXT: GOTO1940 

740 REM ### NEXT LEVEL zrannnnEneree 

750 BI=BI+1: IFBI<>STHEN420 

760 IFPEEK (252) =0THENBI=1:G60T0420 

770 GOT01940 

780 PRINTTAB (2) " {HHITE}YMONEY= {CYAN} "USING"#HHH" 3 P 
EEK (25293 

790. PRINTTAB(13) "CYAN S+ C- S-Iw{YELLOW C# SHIE 
TSPACE CK CI CT}"; 

800 PRINTTAB (25) " {HHITEITRIESTSPACEILEFTE {CYAN}" 
USING"##"3 TR 

810 PRINT"{YL.GRN SH SN38 503" 

820 FORL=0T0203 PRINT" {SH}"TAB(39) "{SQ}"sNEXT 
830 PRINT"{SH SN38 SQ HOHE>" 

840 CHAR,SS,22,"{L.BLU SE SF}"LPOKE247 ,35: PDKE24 
8,22: POKE249 „35: POKE250 ,22 

850 CHAR,37,21,"{L.BLU SA SB 

860 CHAR,37,22,”"{SC SD}" RETURN 

870 REM ### SCREEN 1 HEBEN 

880 PRINT"{HOHE RIGHT DOUN2 BLACK SK CYAN SP SPA 
CE34 SP BLACK SL 

8909 PRINT"{RIGHT YL.GRN SN25 SO SPACE2 SH SH SO 
SPACE2 SH SH 











SH SH SO SH SN2 SO SPACE2 SH SH 
2 SO SPACE2 SH SN2 SO SPACE2 
SH er 
920 PRINT"{RIGHT BLACK SK SPACES L.BLU SI SPACE2 
9 CYAN SP BLACK SL 
930 PRINT"{RIGHT YL.GRN SN25 SO SPACE2 SH SN SO 
SPACE2 SH SN 
940 PRINT" {RIGHT 
AN SP BLACK SL 
950 PRINT" {RIGHT 
sh 
960 
970 
f) 
980 PRINT" {RIGHT 





SPACE1O YL.GRH SH SO SPACE24 CY 





SPACE1O YL.GRN SH SQ SPACE21 SH 





PRINT" {RIGHT 


PRINT"{RIGHT YL.GRN SN11 SO SPACE2 SH SNI15 S 





970 PRINT" {RIGHT SPACE2 CYAN SP SPACES YL.GRN SH 


SQ SPACE9 CYAN SP SPACES YL.GRN SH SQ 


1000 PRINT"{RIGHT SPACE12 SH SO SPACEIS CYAN sp 
SPACE2 YL.GRN SH SQ 

1010 PRINT"{RIGHT SN8 SQ SPACE4 SH SQ SPACEI CYA 
N SP SPACES YL.GRN SH SO F=} 

1020 PRINT"{RIGHT SPACE3O YL.GRN SH 50 

1030 PRINT" {RIGHT SN1O SQ SPACE7T SH SN11-S0 SPAC 
E3 SH SH r 

1040 PRINT" {RIGHT SPACE1O0 SH SN2 SO SPACE SH SN2 
SO BLACK SK CYAN SP 

1050 PRINT"{RIGHT SPACEI3 YL.GRN SH SN SO SPACE2 
SH SN5 SO 

1060 PRINT" {RIGHT SPACE CYAN SP SPACE L.BLU SI S 
PACE2O YL.GRN SH SN SO 

1070 PRINT" {RIGHT SN15 SO SPACEI1O SH SH SO 

1080 P=50:D=7 

1090 POKE214,8:POKE215,& 

POKE218,5: POKE219,10 
POKE222,5:POKE223 ‚20:3 RETURN 

1120 REM ### SCREEN 2 HH . 
1130 PRINT"{CHOME YL.GRN DOHN 

1140 PRINT"CRIGHT SN SQ SPACEI2 SH SO SPACE2 BLA 
CK SY YL.GRN SN8 SO SPACE2 SH SN2 SO SPACE SH SH 
1150 PRINT"{RIGHT SPACE SH SO SPACE& CYAN SP SPA 
CEB®B BLACK SY YL.GRN SN SO CYAN SP SPACE YL.GRE S 





1110 











GSompube mi 


SH SH SO SPACE2 SH 


<b> 
<237> 


<99> 
<134> 


<49> 
<158> 
<232> 
<253> 
<123> 
<194> 
<173> 
<179> 
<14> 
<219> 
<91> 
<31> 
<22> 
<195> 
<51> 
<b> 
<134> 
<54> 
<80> 
<92> 
<39> 
<123> 


<41> 


<136> 


<219> 
<135> 
<81> 
<1> 


<94> 
<43> 


<151> 
<169> 


<213> 
<114> 


«55> 
<162> 


<40> 
<173> 
<bb> 


<38> 
<1> 
<159> 
<223> 
<114> 
<130> 
<107> 
<49> 


<190> 


Sn3 50 EYAN SP2 YL.GRN SH SN SO SPACE CYAN SP 
SPACE YL.GRN SH SH = 
1160 PRINT" {RIGHT SPACE2 SH SQ SPACE1O SH SO SPA 
SPACE4 YL.GRN 


CE2 BLACK SY YL.GRN SN SO CYAN SP 
1170 PRINT" {RIGHT SPACE CYAN SP SPACE YL.GRN SH 
SQ SPACE13 BLACK SY YL.GRN SN SO CYAN SP SPACE L 
„BLU SI R 

1180 PRINT"{RIGHT SPACE4 YL.GRN SH SO SPACEB SH 
SQ SPACE2 BLACK SY YL.GRN SN9 SQ SPACE3 SH SO 
1190 PRINT"{RIGHT L.BLU SI SPACEIT BLACK SY. YL.G 
RH SN SO CYAN SP2 SPACE4 YL.GRN SH SQ SPACE2 SH 


SN2 SQ 





} 
1290 PRINT" {RIGHT 
1300 PRINT" {RIGHT 
=GRN. SPACE3 SH SO 
1310 PRINT" {RIGHT 
SN2 SQ 

1320 PRINT" RIGHT. 
CE2 SH So 

1330 PRINT" RIGHT. 
358 
1340 
1350 
1360 
137C 
1380 
1390 











PRINT" RIGHT. 

P=100:D=8 

POKE214 ‚2: POKE215,7:POKE232,19 

POKE218,25: POKE219,5: POKE233,11 

POKE222, 23: POKE223, 15: RETURN 

REM ###* SCREEN 3 ERERAREREREFRRRRR 

1400 PRINT"CHOHE YL.GRN DOHN 

1410 PRINT"{RIGHT SPACES SH SO SPACE3 SH SO SPAC 

E3 SH SO SPACE3 SH SO SPACE2 SH SH 

1420 PRINT"{RIGHT SPACE2 L.BLU SI SPACE26 YL.GRN 
SH SN2 SQ SPACEZ3 SH SH 








SPACE2 SH SO SPACE3 SH SO SPACE2 CYAN SP SPACE2 


YL.GRN SH 
1440 PRINT" {RIGHT SPACE2 SH SN23 SO 


SQ SPACE3 CYAN SP SPACE2 YL.GRN SH SO SPACES SH 
sh so 
1470 PRINT"{RIGHT SPACE2 SH SN3 SO SPACE4 SH SNS 


Sa SPACE3 SH SN SQ SPACE2 SO SPACET SH SN Sa 





SPACE6 SH SN4 SO SPACE3 SH SN4 SO SPACE2 SH SN 
SO SPACES BLACK SY 
1500 PRINT"{RIGHT SPACE2 YL.GRN SH SN2 SO SPACE2 
SH SO SPACE2 SH SO SPACE2 SH SN SQ SPACE2 CYAN 
SP SPACE2 YL.GRN SH SN SO SPACE SH SQ SPACE SH S 
0 SPACE4 BLACK SY 








<a6> 
<243> 


<87> 


<196> 


<170> 


<42> 


<115> 


<212> 


<151> 
<168> 


<255> 
<52> 


<58> 


<223> 
<203> 


<a5> 
<335) 
<162> 
<89> 
<117> 
<2> 
<168> 
<118> 
<225> 
<133> 
<a4> 
<104> 


<65> 


<224> 
<a5> 
<95> 


377 
<165> 


<219> 


<128> 


<135> 
<49> 


<164> 
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programme 
































1530 PRINT" {RIGHT SPACE2 YL.GRN SH SQ SPACE CYAN 1900 POKE214 ,2:POKE215,5:POKE232,38 <191> 
H SP SPACE YL.GRN SH SN2 SQ SPACE CYAN SP SPACE Y 1910 POKE218,2:POKE219,7:POKE233,14 <i81> 
'  L.GRH SH SN2 SO SPACE2 SH SQ SPACE4 SO SPACE1O B 1920 POKE222,2:POKE223,92RETURN <144> 
| LACK 5X <245> | 1930 REM BBBBRHHHHRSHIHIHIHIHIHIBISIHIHIHIHIHI IHNEN <86> 
1540 PRINT"{RIGHT SPACE2 YL.GRN SH SO SPACE2 SH 1940 SCNELRSP=PEEK (252) +TR#30 <152> 
|  SN4 SQ SPACE2 SH SN3 SQ SPACE4 CYAN SP SPACE YL. 1950 PRINTTAB (6) "{DOWNS YELLOW>FREDDY 'S{SPACEIMO 
GRN SH SN2 SO SPACE CYAN SP SPACE YL.GRN SH SO S NEY SPACE} IN{SPACEYTHEISPACEIEND{SPACEFIIS <126> 
PACE3 BLACK SY. <140> | 1960 PRINTTAB(18) "{DOHN BLACK} "USING" #4"; P <90> 
ı 4550 PRINT"{RIGHT SPACE CYAN SP YL.GRN SH SPACE4 1970 PRINTTAB(6) "{DOHNS HHITEIDOLSPACEIYUUTSPACE 
| SH SN2 SO SPACE4 SH SN3 SO SPACE4 SH SN SO SPAC 3WANT£{SPACEITOTSPACEIPLAYTSPACEIAGAIN{SPACEYI?? <30> 
E SH SN3 SQ SPACE4 BLACK SY . <82> | 1980 PRINTTAB(&)"IDOHN BLACKIVES{SPACE CYANIS <59> 
' 1560 PRINT"{RIGHT SPACE2 L.BLU SI SPACE34 BLACK 1990 PRINTTAB (6) "{BLACK SPACEIND" VOL: Y=16 <93> 
Sy <186> | 2000 J=J0Y (1) s IFISOTHEN2000 <215> 
| 1570 PRINT"{RIGHT SPACE2 YL.GRN SH SN23 SQ SPACE 2010 IFJ=128THEN2090 <63> 
10 BLACK SY <5> 2020 IFJ=1ANDY< >16THENY=16: 60102050 <195> 
ı 1580 PRINT"<{RIGHT SPACE2 L.BLU SI SPACE34 BLACK 2 2030 IFJI=5ANDY<>17THENY=17:60T02050 <246> 
iı| <206> | 2040 GDT02000 <44> 
| 1590 PRINT"{RIGHT SPACE2 YL.GRN SH SPACE& SO SPA 2050 CHAR,10,16, "{SPACE}I" ; <89> 
| CE2 SH SPACES SQ SPACE2 SH SPACE3 CYAN SP SPACE3 2060 CHAR,10,17,"SPACE}" <106> 
YL.GRN SH SO SPACES BLACK SY : <254> | 2070 CHAR, 10,Y,"tCYANI<" <68> 
1500 PRINT"{RIGHT WHITE SV SH YL.GRN SH SO SPACE 2080 SOUND1 ‚520,5: G60T02000 <140> 
| CYAN SP SPACE2 YL.GRN SH SQ SPACE2 SH SO SPACE2 2090 IFY=1&THENRUN <7> 
| CYAN SP SPACE YL.GRN SH 50 SPACE2 SH SQ SPACES 2100 SYS65526 <247> 
| SH SN2 SD <83> ENDE DES LISTINGS 























SO BLACK SH2 YL.GRN SH SN4 SO <49> 
1620 P=100:D=9: POKE226,30:POKE227,13 :£49> ICONS NZLE 
1630 POKE214,4:POKE215,3:POKE232,38 <162> 
| 1eso PokeS22/4rOKEz2s.1mıRETUm <> 
| 50 POK 5 223,19: ; : m 
| 1660 REM *#* SCREEN 4 HR <ı59> | Nachdem der Tronic-Verlag mit C-64 und Plus 4 auf die eines aus- 
| 1670 PRINT"t{HOHE DOHN <230> | großem Erfolg eine 64K-Speicher-- gewachsenen Personalcomputers 
j u 8 . 8 P . 3 us P 
ET RIO HE BERER SE ELURN BB SI BEER Re | erweiterung fer.den C-16/116 in aufzurüsten. Von der technischen 
1690 PRINT"(RIGHT SPACEZ HHITE SV SH YL.GRN SH S einer der vorangegangenen Aus- Seite sind alle Probleme gelöst, so 
0 BLACK SK HHITE SV. SH SPACE3 BLACK SH2 SPACE& S gaben von »COMPUTE MIT« daß eigentlich sofort mit der Se- 
H2 SPACE2 YL.GRN SH SN3 SQ SPACE& BLACK SY. <250> | angeboten hat, möchten wir auch rienproduktion begonnen wer- 
2 REN HIT ERS ORN ED SEAEEE en He 5 ER jetzt wieder auf ein neues Hard- den könnte. Wir möchten Sie des- 
| 1710 PRINT"tRIGHT L.BLU SI SPACE2I YL.GRN SH SO. ware-Angebot hinweisen. Wir halb bitten uns umgehend mitzu- 
SPACE3 WHITE SR SS. SPACE2 YL.GRN SH SO SPACE4 BL | planen für den Anfang des Jahres teilen, ob und an welcher 
ACK, SY <113> | 1987 den Ausbau einer Speicher- Speichererweiterung Sie interes- 
Zr EN un ae ee ee 52 DER erweiterung auf 256K-Byte. Dazu siert sind. Die genaue Aufstellung 
1730 PRINT"{RIGHT L.BLU SI SPACE13 CYAN SP SPACE müssen wir jedoch von Ihnen wis- der Erweiterungen für die einzel- 
7 YL.GRN SH SO SPACE2 SH SN. SQ SPACE CYAN SP SPA sen, ob bei dem User überhaupt nen Syteme und die entstehenden | 
CE YL.GRN SH SH SQ SPACE2 BLACK SY <155> | ein Interesse dafür vorhanden ist, Kosten können Sie der. nachfol- 
1740. PRINT" {RIGHT YL.GRN SN4 SO SPACES SH SO SPA die Speicherkapazität des C-16/116, enden Gliederung entnehmen: 
CE3 SH SN SO SPACE3 SH SN3 SD SPACEZ SH SN6 SQ S Sp pP 8 8 
PACE3 BLACK SY. <190> 
1750 PRINT"{RIGHT L.BLU SI SPACE21 YL.GRN SH SO Tr 
1750 PRINT" ERIGHT. L.BLU SI SPACEZE VLCRN En 5 C-16/116 aufgerüstet auf 256K-Byite 
ACE4 BLACK SY <205> | als Bausatz 
1760 PRINT"{RIGHT YL.GRN SN6 SO SPAGE4 SH. SN5 SQ . n : 
SPACE3 SM SN SO SPACE2 SM SO SPACES BLACK SY 39 (Lötungen men abe vorgenommen werden, Bauanleitung und 
1770 PRINT"{RIGHT L.BLU SPACE22 YL.GRN SH SO SPA Zubehör wird geliefert) 223,— DM 
CE2 SH SO BLACK SH7T, SPACE2 SY. <164> u. 
1780 PRINT"{RIGHT. SPACES YL.GRN SH SN6 SD SPAGEZ x zum Umrüsten .: He 
SH SN6 SO SPACE2 SH SN7 SO SPACE2 BLACK SY <23> (Sie senden Ihren Computer zum Umrüsten an eine Firma 
1790 PRINT"{RIGHT YL.GRN SN SO SPACE20 SH SO SPA ; ein) 263,— DM 
CE2 SH SO BLACK S67 SPACEZ SY. <190> 


! 
1800 PRINT"{RIGHT YL.GRN SN3. SO: SPACE? SH SNS SO .. BE 
SPACES su SU 80 SPAGEZ Sn so spaces zıack sv  <2so>| (-64/Plus 4 aufgerüstet auf 256K-Byte 

















0 SPACE2 SH SQ SPACE CYAN SP YL.GRN SPACE SH SN2 als Bausatz 173,— DM 

SO SPACE2 BLACK SY <249> x 

1920 PRINT"{RIGHT YL.GRN SNZ SO SPACES SH SN SO, zum Umrüsten 218,— DM 

SPACE3 SH. SN3 SO SPACE2 SH SO SPACE9 BLACK SY. <89> 

1830 PRINT"(RIGHT YL.GRN-SNI SO SPACE4 CYAN SPS : a 

PACE3 YL.GRN SH SN4 SO SPACE2 SH SNT SO SPACE2.B Senden Sie Ihre Mitteilung umgehend an folgende Adresse: 

LACK SY. <4> 

1840 PRINT"{RIGHT. SG10 SPACE3 SH3 SPACE2 566 SPA TRONIC-VERLAG GmbH 

CE2 YL.GRN SM SO SPACE9 BLACK SY. : <205> B 

1850 PRINT"{RIGHT SPACE13 YL.GRN SH SN SQ SPACEI Hardware-Service 

4 SH SN3 SO SPACE2 BLACK SY. <192> 

1860 PRINT"{RIGHT SPACE4 SH7. SPACE7 SH6 SPACE2 Y. Postfach 870 

L.GRH SH SO SPACEP BLACK SY. <25> 

1870 PRINT"{RIGHT SPACE CYAN SP SPACE BLACK SH Y. 3440 Eschwege 

L.GRN SH SN5 SO BLACK SH SPACE2 CYAN SP SPACE2 B : 

ne a NE SL SEREL EHE en ‘ö <197> | Bitte senden Sie keine verbindlichen Bestellungen ein. Wir möchten zu- 

ISBEIEL On SO HERR En EL DAN En En n— nächst nur die Resonanz auf unser: Angebot testen und werden dann zu 
5 SO BLACK SH5 YL.GRN SH SN- YELLOHIA-S : = : : : = : 

£YL.GRN SN SO <18&> | einem späteren Zeitpunkt in der Zeitschrift »COMPUTEMIT« ein ge- 

1890 P=150:D=91 POKE226 ,50: POKE227,10 <9> naues Angebot und die entsprechenden Bestell-Modalitäten bekanntgeben. 
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% Kleinanzeigen % Kleinanzeigen % Kleinanzeigen 









r 


COMPUT 









C64 


256 KB Systemspeichererweit. 








Software 





- ”C-16/116” Verkaufe 10 TOP-GAMES 
(z.B. Goldrausch, Submarine, Inv. of 
Space, Space Ship...) für 20,-- DM auf 
Kassette. Info gratis. Einsenden an: 


Klaus-Peter Banko, Alte Poststr. 14, - 


4577 Nortrup, Tel: 05436/285 
Suche Kontakte zwecks Erfahrungs- 
“ austausch! 





€ 128, C 64, C 16/116, Plus 4, VC 20 
- 6 Spiele 19,90 

- Textverarbeitung 12,90 

- Adress, Karteikasten je 29,90 

= Video-, Musikarchiv je 29,90 

- Denktraining 19,90 

- Vokalbeltrainer 19,90 

- Katalog gegen 2x80 Pf-Marken bei: 
Computerservice Tino Hofstede, An 
der Windmühle 8, 5010 Bergheim 5 


= 


SOFT 


C16/Plus 4 Disk Cass. 


Asterix 29, über 150 versch. Spiele auf Lager x 

60 for Gold 19,--  29,-- 17 versch. Mastertronic Games” je 9,90 
Yier ar Kung Fu 32,-- 39,--  Adreß, Datei, Vokabel, Text, Utility 

'Goonies 29,-——- 49,-- je Programm auf Cass. nur DM 29,90 
Eing Kon 34--  46,-- Danger Diamonts 39,--  29,-— 
Fight Night 32--  39-- Sun Street (The Newsboy) 39--  239-- 
Mercenary Compendium 49,--  59-- Jump Jet (+ 16K/Plus4 39,-- 
Ultima IV 69,-- __ Mercenary Plus4 39,-- 
C128 Disk Mercenary Compendium Plus4) 52,-— 
The Last V8 24,90 joteur Plus4 39,-— 
Kickstart 24,90 9,90 
The Rocky Horror Show 49,-- Shark f 9,0 
Vizawrite Classic (Deutsch) 348,-- Auiga 9,90 
Vizastar 128 (Deutsch) 398,-— Lunar Doking 14,90 
AMIGA Disk  Boo 9,90 
Hacker II 89,-- Grandmaster 29,00 
Wisbringer g8,-- Winter Events . 29,00 
Leader Gotas 109-- Atari.ST / IBM / Schneider auf Anfrage 

'Vizawrite. AMIGA 5 Mindestbestellwert DM 30,-- 






3000 Hannover 1 Riesenauswahl an Software 

\ 7 17 N An der Tiefenriede 27 sofort CS.J NEWS anfordern 
AN Tel.: Service 0511/886383 bitte angeben 
SOFTWARE CSJCOMPUTERSOFT JONIGK Händieranfragen erwünscht 






JONIGK 



















Nicht vergessen CSJ NEWS anfordern 
















€-16/116 Softwarel!! 

20 Spiel- und Anwenderprogramme für 
nur 20,-- DM. Die Programme sind auf 
Kassette. 20 DM als Schein oder 
Scheck bitte an: Daniel Beitlich, Kleine 
Höll-bergstr. 6, 6000 Frankfurt 50 oder 
Info-blatt für 80 Pf.-in Briefmarken an- 
fordern. 5 





SKK ErRerK 
C16+64K und Plus 4 * 
BÖRSE * 
Ein Profi-Anwender-Programmin * 
*% hochauflösender Grafik, 15 Gra- * 
* fiken, aktueller Kontost. u.v.m. * 
* Auf Kassette für 8,50 DM + 1,50 * 
%* DM Porto+Versand 10 DM- x 
%* Schein an: Manfred Leopold, * 
* Hatzfelder-Str. 116, 5600 Wup- * 
* pertal 2%* 
%* Tel.: 0202/702876 * 
KEIN 


Verkaufe über 20 Originalspiele für 
C16, z.B. SOCCER, SKRAMBLE, 
ROCKMAN, und so. Spielekassette 
von Robtek. Bitte melden bei Rene 
Reinthal, Tel. 02225/2890 ab 14 Uhr 


Verkaufe 5 C-16/116 Spiele auf Kas- 
sette (Sherlocks, Arrow) zusammen nur 
10,-DM! Vorkasse!!! Hubert Mühlba- 
cher, Platten-berg 3, 8221 Waging 





*** 016/116 u. + 4 GRAPHIC- 
ADVENTURE *** 

Nach den ”JUNGERN...” jetzt das 
Zweite, ”Die Maske” -lassen Sie sich in 
das Reich der Phantasie entführen. 
Über 45 Bilder 2x10.Min., Cassette voll 
be-spielt. Cassette 20,--DM (Schein) 
oder per NN+4,-DM VK. Bestellen 
bei: GBR U+K, Bickernstr. 161, 4650 
Gelsen-kirchen. Info gegen 80 Pf. 





C-16 SPITZENSOFTWARE 
Programmpaket: _ 

1. Pilot (brandneues Adventure) 

2. Blackjack C-16 

3. Flugsimulator 

Cassette kommt sofort für 10,--DM Vor- 
kasse (incl. Porto) an: Ludwig Wiese- 
müller, Birkenweg 37, 3408 Duder- 
stadt 27 





Brauchst Du heute noch 5 Spiele 
kauf bei Mini-Soft ganz viele. 
Restposten::C16/116 Software 
Gammelpack 1 (5 Spiele) 11,11 DM 
Gammelpack 2 (10 Spiele) 18,18 DM 
Die Gamespacks beinhalten: z.B. Ko- 
bra,Tennis,Moon _ Fighter, Jumpman 
u.a. Bestell es direkt bei: Mini-Soft, 
Stryckweg 48, 3542 Willingen 





Achtung C-16 User! 

Tausche und verkaufe Anwender- und 
Spielprogramme. Gr. Auswahl! Ulf Pe- 
ters, Gablonzer Str. 11, 2351 Trappen- 
kamp 





C16, C116 Superspiele! 

Info gegen Rückporto bei Hannes Kal- 
tenbach, Prielmayerstr. 16, 7990 Frie- 
drichshafen 1 





15 Superspiele für C-16 auf Kassette 
zu verkaufen! Ab 1.1.87 bei Kai Uwe 
Boß, IImenweg 5, 6422 Herbstein. 
20DM in den Umschlag stecken und 
abschicken !!! ° 


C-16, C-116 + Plus 4 Superspftware, 
Info = 80 Pfennig. Anfordern bei 
Michael Husen, Ritterstr. 55, 2800 Bre- 
men 21 





***G 16/116/Plus 4 Zeichen- und*** 
***Grafikprogramme für 16K und*** 
***64K-Version. CAD-Basissystem*** 
***Info gegen Porto bei Dipl.Ing*** 
***M. Rätzel, Ulvenbergstr. 6,*** 
***D-6100 Darmstadt 13*** 





C-16 !!! Verkaufe TOP-Spiele für C-16, 
z.B. Bandits at Zero, Rockman usw. 
20% Ermäßigung auf jedes Spiel. Liste 
bei Christoph Furtkamp, 

Tel. 02851/2511 





C-16/Plus 4! Spiele und Anwenderpro- 
gramme nur 1,--DM! Große Liste anfor- 
dern gegen Briefmarke oder-Rückum- 
schlag bei Jürgen Roumen, Eichenstr. 
49, 4054 Nettetal 1 





€ 16/116/Plus 4:TOP-Spiele £ An- 
wender,Graphicen + Musik zu Super- 
preisen. 150 Programme. Liste gegen 
Rückporto, DEMO-Cass. 6 DM. Ferner 
ab Januar 87 der Bombenhit: ”USER” 
- Die C16 Zeitschrift auf Cassette. Mit 
Spielen, Anwender,.Infos, Gratisanzei- 
gen, Tips & Tricks, Preis 6 DM + 1,30 
Porto. Anzeigentexte willkommen. 





10 C-16/116 Spiele für 10,-- DM!!! 

Mit: Pac-Man, Invaders of the Space, 
Cowboy-Duell, Tank-Wars, Turmsprin- 
gen, SDI, Jäger des verlorenen Schat- 
zes, Mimi, Cave, Submarine. Bitte fran- 
kierten Rückumschlag mit 10 DM an: 
Peter Preuss, Remmelsweg 5, 7107: 
Bad Friedrichshall 2, P.S. Tausche 
auch Software! ! 





Das besondere Programm! 

TURTLEGRAFIK für C-16 (64K) und 
Plus 4. Info gegen Rückporto bei: B. 
Lauer, Handgasse 10, 8700 Würzburg. 





serzswrawem Hobbt-tronic 


10. Ausstellung fur Funk- und Hobby-Elektronik 


GOMRUNER; 
SICHAU 








Dortmund 


CSompute mik 


18.- 22. Februar 1987 


3. Ausstellung 
für Computer, 
Software 

und Zubehör 


Tips. 


Die umfassende Marktübersicht für Hobby- 
Elektroniker und Computeranwender, 
klar gegliedert: 


In Halle 5 das Angebot für CB- und 
Amateurfunker, Videospieler, DX-er, Radio-, 
Tonband-, Video- und TV-Amateure, für 
Elektro-Akustik-Bastler und Elektroniker. 
Mit dem Actions-Center und Laborversuchen, 
Experimenten, Demonstrationen und vielen 


In Halle 6 das Superangebot für Computer- 
anwender in Hobby, Beruf und Ausbildung. 


Dazu die „Computer-Straße” als Aktions- 


Ausstellungsgelände Westfalenhallen Dortmund täglich 9.00-18.00 Uhr 


bereich, der Wettbewerb „Jugend program- 
miert” und die Stände der Computerclubs. 
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= Hardware 


| Verkaufe wegen Systemwechsel 


C116+64K für 150 DM. Außerdem 21 
Spielkassetten, z.B. Bomb Jack, Berks, 
Pluspaket, Favo-rite 4, Turbo Tape u.a. 
für 250 DM (we-nig benutzt). Zusam- 
men für nur 380 DM! Angebote an: 
Frank Roulands, Benrader-str. 135, 
4154 Tönisvorst 1 





Verkaufe Plus 4 nur 320,--DM, VC-20 
nur 100,--DM, 16K-RAM 60,--DM, ver- 
kaufe für C-16: Gehäuse + Tastatur 
25,-- DM, TED-Chip 50,-- DM, ROM- 
Chips je 15,--DM, Adress-Chip 15,--DM, 
Netzteil 15,--DM. Alle Preise +6,--DM 
NN. Suche für Plus 4 EPROM-Brenner 
+ Plotter 1520 je 130,--DM, evil. 
Tausch. Christoph 
28, 3530 Warburg, Tel.: 05641/1332 





C16/116 Speichererweiterung 64K 

- Umrüstservice DM 74, 

- Steckbar ohne löten DM 65,-- 

- Bausatz kompl. DM AB»- 

- Datasetteninterface DM 79,-- 
Preise + 6,--DM Versandspesen, Info 
gegen Freiumschlag, Tel.: 06203/43468 
(14-17 Uhr) 5 





+++ Verkaufe C-116 + + + 

Mit BASIC-Kurs, sowie Datasette und 

31 Spiele: z.B. ACE, Bombjack, Reach- 

: head, und viele mehr. Wo? Rainer Hüt- 

tiger, Kremser Str. 14, 8500 Nürnberg 
50 


Drube, Kasseler Str. 


Verkaufe Commodore C16+ 
Data-sette und den Spielen Winter 
Olympiade, Space Pi-lot, Daley Thomp- 
sons Star Events, Plus Paket, Basic- 
Lernkassette und Joystick- adapter. 
Dazu 3 Handbücher über den C16. 
Preis 250,- DM. Martin Müller, Ost-str. 1, 
8391 Hintereben, 

Tel.:08581/ 2261 


Verkaufe C16+ Datasette + 12 Spiele 
+Joy-stick + BASIC-Cassette + BASIC- 
Buch! la-Zu-stand. VB:280,--DM, 
Tel:06195/4723 

Verkaufe 

C-16 + Datasette + Joystick + SIW-Mo- 
nitor + 7TOP GAMES (z.B. Bomb Jack) 
Preis 500,--DM, Tel: 05602/5425, 
Walde-mar Glodny, Egerlandstr. 13, 
3436 Hess. Lichtenau 


Commodore C-16/116 
Speichererweiterung 64 KByte Bausatz: 
mit allen benötigten Teilen, Schalter für 
16 KByte-64 KByte umzuschalten und 
ausführlicher Bauanleitung für nur 
49,50 DM (incl. MwSt.) per Nachnah- 
me. Frank Schmitz, Kurzer Weg 1, 
5206 Neunkirchen 2, Tel.: 02247/8111 


Commodore C16 - 116- plus 4 
Userport.... Wird einfach in das Ex- 
pansionsport eingeschoben. Kompati-- 
bilität zum C64 gut möglich. 2 8&Bit 
WOl1Serie-Por/’2 16Bit Timer/t 
Echtzeit-Uhr usw. für nur 98,--DM (incl. 
MwSt) + Port per NN bei: Frank 
Schmitz, Kurzer Weg 1, 

5206 Neunkirchen 2, Tel.: 02247/8111 


















Winter Olympiade (K) und (D) DM 24,90 
The Way ofthe Exploding Fist (K} DM 27,90 
ACE (64K Version) (K) und (D) DM 32,90 
Commando (K) . DM 24,90 


Yie are Kung Fu DM 24,90 








Legionaire (K) DM 15,90 
Mercenary (64k!) (K) DM 26,90 
Favourite 4 (4 Programme) (K) DM 24,90 
Classics I+Il (je 4 Programme) (K) je DM 27,90 
King Size (50 Programme) "(K) DM 24,90 
Lawn Tennis (K) DM 24,90 
Video Poker (X) DM 9,90 
Quiwi (Trivia) (K) und (D) DM 23,90 










- Katalog mit Preisen und Programmbeschreibu: 


BisDM50,- 2,550; BisDM 100,- 3,90; 





C-16 großer Bruder des C-64 
Datenfernübertragung wird zum Kin- 
derspiel! Erweiterungsplatine >USMO 
I<. für C-16/116 mit RS-232 und zwei 
Userports für DM 138,--. Modem 
steckfertig mit passender Software: 
3% Wahl von der Computer-Tastatur 

* Autoanswer 

* Mailboxbetrieb DM 148,-- 
Speichererweiterung DM 49,- 

Guss Data Connection, 

Tel.: 02723/6679 


SCHIENE LIEIGIUNG 7 SAyLEilalt yulallge I Tureent 


SPIELPROGRAMME ANWENDERPROGRAMME 


Musik Master (K) und (D) DM 22,90 
Micro Kalk (K) und (D) DM 22,90 
Micro Datei (K) und (D) DM 22,90 
Paint Box (K) und (D) DM 19,90 
Graphic Designer DM 15,90 
Turbo Tape (K} DM 15,90 
C-16 Utilities K) DM 27,90 





International Karate (K) DM 19,90 
Ghost'n Goblins (K) DM 27,90° 
Projekt Nova (K) DM 22,90 
Bomb Jack (K) DM 19,90 
Frank Bruno’s Boxing K) DM 19,90 
Plus Paket (4 Programme) (K) und (D) DM 29,90 | ROM Modul 64 K (Einbau ohne löten) DM 109,00 
European Games (Sportspiel) (K) 19,90 | Abdeckhaube C-16 hartplastik IM 12,00 
Trail Blazer K) DM 21,90 | Abdeckhaube C-16 weichplastik DM 9,00 
Computer Hits 10 Vol. 3 (K) 27, ‚Abdeckhaube 15511541 DM 9,00 
Robo Knight (K) DM 9,90 | Abdeckhaube Datasette 1590/1531 DM 690 
Datencasseiten C-15 10 Stück DM 15,90 
Disketten No Name 2D5,25 10 Stück DM 14,90 
Thermodrucker TXP 1000 (auch f. Nommalp. DM 398,00 
Farbmonitor Philips CM 8500 DM 498,00 

DM 24,90 


Diskettenbox f. 100 Disk 51/4 aufkl., Schl. 
Joysti R 





ingen gegen DM 0,80 in Briefmarken. Versand erfolgt 
gegen Vorauskasse oder Nachnahme (zzg). DM 2,50 + Zahlkartengebühr). An Versandkosten fallen an: 
Bis DM 300,- 5,90, Über DM 300,- 8,50 















HARDWARE UND ZUBEHÖR 














Quickshot I1+ (mit Microsch.) 







PLUS 4 + +PLUS4++PLUS4 + + 
Datenfernübertragung jetzt nur ein 
Kinderspiel. DFÜ Komplettanlage be- 
stehend aus Adapter, Modem und Su- 
persoftware. Wählen von der Compu- 
tertastatur: 

*%* Wahlwiederholung 

%* Auto-Answer 

* Mailboxbetrieb * *229,--DM** 

Ihr DFÜ-Spezialist 

GUSS DATA CONNECTION, Tel.: 
02723/6679 


Wir haben die neueste Software! 


Commodore 16/116/PLUS4 


ACE 
ACE (+64K) 
Baby Berks 


Kikstart 


Kassette 
Legionär 


32,00 DM 
34,95 DM 
9,95 DM 


Paint Box 
Pod 


Matrix/Laser Zone 
Monty on the Run 
Out.on a limb 


So bestellen Sie: 


Des Minudostbestellwert von Software 
liegt boi 15.00 uMt 


14,95 DM 
24,95 DM 
29,00 DM 
34,95 DM 
34,95 DM 
32,95 DM 
26,95 DM 
32,95 DM 
25,00’ DM 
9,95 DM 
9,95 DM 
25.00 DM 
29,00 DM 
9,95 DM 
14,95 DM 
19,95 DM ° 
14,95 DM 
25,00 DM 


Bandits at Zero 
Bench Head 

Bomb Jack 
Classics (4 Spiele) 
Classics Il (4 Spiele) 
Classics Ill 
Commando 
Computer-Hit (10 Spiele) 
Daily Thompson: 
Finders Keepers 
Formula One Sim. 
Frank Bruno’s Boxing 
Ghosts’n’Goblins 
G-Man 

Gult Wring Falcon 
International Karate 
Jack Attack (Modul) 
Jet Set Willy 


Project Nova 

Quiwi (+64K) 

Raider 

Rockman 
ROM-Listing 
Scramble 
Space’Pilot 

Speed King 

‘Street Olympics 

Text Manager (Disk) 
Text Manager (Kass.) 
Thai Boxing : 
Trail Blazer. 

Turbo Tape - 

Water Grand Prix 
Wimbledon 

Winter Olympiade 
Yie Ar Kung-Fu 


Sıe konnen dus Geld in ber ader peı 
Scheck Ihres schrittlichen Bustetlung 
berlayon 


Ber Hschnahme Versand werden 4 vu UM 
fur Porto Kosten erhüuben. 


Auslandsbesteklungen werden nur per 
Vorauskasune entgegunyenomman! 


Rufen Sie uns doch einfach einmal 
an! Unsere Telefone sind wuchentags 
I sb 9.30 ulNR fur Sie zu erreichen! 


SOFTWARE-VERSAND 


| 

1 

ANDRENS EACHLER 
| POSTFACH 429 
D-42890 BUCHOLF 


29,00 DM 
29,00 DM 
29,00 DM 


Fordern Sıe kostenloses Informationsmoteria] über unser Liefer- 
Programm für folgende Computer an: 


COMMODORE 64/128, COMMODORE 16/116/PLUS A, ‚SCHNEIDER 464/664 
ATARI 430XE/26057/520ST/800XL, SINCLAIR SPECTAUM und MSX 


| TELEFON-NR. (02871) 183088 ze 
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*C-16/116/ +4 Hardware & Zubehör* 


64K-Erweiterung & Schalter 49,50 
64 K-Erweiterung o. Schalter 39,50 
64 K-Erweiterung mit Einbau 65,50 
Daten-Cassetten C15 5 Stück 7,80 
Computape Dataset C15 11,50 
Disketten Pen set 3 Stück 8,20 
Endlospapier 1000 Blatt 28,50 
Kunststoff-Pinzette 125 mm 0,80 
Disketten 5 1/4” 10 Stück 12,80 
Kopiehalter Format A4 47,50 
Mikro-Lötkolben 12V/8W 9,50 
Daten Cassetten C15 1 Stück 2,20 
Cassetten-Archiv für 24 Stück 6,50 
EDV-Endlospostk. 250 Stück 22,50 


Versand per Nachnahme 

Fordern Sie bitte unseren Hauptkata- 
log an gegen 80Pf Porto. 
PC-HC-ELEKTRONIC-TECHNIK 
Fritz-Reuter-Str. 3, 2914 Barßel 





An „Compute mit...“ 
Tronic-Verlag 
Postfach 

3440 Eschwege 













austausch usw. 





Private Kleinanzeigen 












scheinen) 






gegen Vorkasse! 





noch preiswerter 





Unter der Rubrik „Kleinanzeigen“- 
veröffentlichen wir Gelegenheits- 
anzeigen für Verkaufsangebote, 
Kauf- und Tauschgesuche, Kon- 
taktaufnahme bzw. Erfahrungs- 


Unser Preis für „Kleinanzeigen“: 


bis 5Zeilen nur DM 5,- DM 
bis 10 Zeilen nur DM 10,- DM 
Jede gewerbliche Gelegenheits- 
anzeige ; 

bis 10 Zeilen nur 15,- DM| 


(dürfen nicht unter Chiffre er-- 


Eine Veröffentlichung erfolgt nur 


Kleinanzeigen jetzt 


Rennersoft-Computer-Distribution 


HARDWARE - SOFTWARE - PERIPHERIE 


COMPUTERSPIELE für 
Commondore C16/116+4 


z.B. Commando, Bomb-Jack, Airwolf, Legionaire, 
Frank Brunos Boxing, Schach, Atlantis usw. 


Liste M 1 anfordem! 
Telefonservice täglich von 19-22 Uhr 
Postfach 920 - D-4440 Rheine - Tel.05971/81592 


+ + +Achtung C-16/116 USER + + + 
Tausche Original-Software 

Suche C-64 zahle bis 150,-- DM 

mit Zubehör auch mehr! MELDEN bei: 
Guido Lange, Bergstr. 20, 

8741 Schönau 


Suche Tauschpartner für C-16/+4 
Software! Frank Stefan, Ortelsburger 
Straße 23, 3400 Göttingen 


C16-Einsteiger sucht Kontakte mit 
Profi, suche auch billig Drucker. Wer 
hilft mir? Antwort bitte an: A.Z. Duda, 
Barbarossaring 32, 6750 Kaiserslau- 
tern, Tel.: 0631/40656 nur SA-SO 


Name und Adresse 





Suche: C 16 oder C 116 mit Datasette 
und Joystick und Spielen. Angebote 
an: Martin Krafft, Tel.: 0231/679435 ab 
14 Uhr. Preis: bis 200,-- DM 


Suche C-16 ohne Speichererweite- 
rung bis 100,-- DM sowie Drucker für 
C-16 bis 200,-- DM. Angebote an: 
Dietmar Blom, Konenhoek 13, 

4407 Emsdetten 


I am searching for: Genesis, biete 
10,00 DM, Grandmaster, Football- 
Manager, Winter-Olympiade, Turbo- 
Tape, etc. für C-16 und Tape! R. Loep- 


ki, Heidrehmen 20, 2000 Hamburg 55 - 


**** AN ALLE C-16-FREUNDE **** 
Suche Software! Tausche auch Kiste 
meiner Programme gegen Rückporto 
an Guido Bender, Maienstr. 8, 6602 
Saarbrücken-Dudweiler 


Suche Kopierprogramm für C 16/64K 
um Progr. von Cass. auf Disk zu kopie- 
ren. H. Schrimpf, Eikeloher Str. 4, 4782 
Erwitte 


++ +Achtung C-16/116 USER+ + + 
Tausche Original-Software 

Suche C-64 zahle bis 150,-- DM 

mit Zubehör auch mehr! MELDEN bei: 
Guido Lange, Bergstr. 20, 

8741 Schönau 


Tausche Software aller Art. 

Bitte meldet Euch (neue und alte Soft- 
ware). Daniel Schmidt; Sindelenstr, 2, 
CH-8340 Hinwil 





Auftrag für Gelegenheitsanzeigen in „Compute mit..‘“ 


C-16/116/+4 User-Club für Anfänger 
und Fortgeschrittene! Listings, Kurse, 
Sammelbestellung u.v.m. Info (50 Pf. 
Porto) bei Volker Huppert, Ferlingsweg 
15, 4150 Okrefeld 1! 


Größter C 16/116/P4 CLUB 

Bietet einen tollen Service u. a.: Fach- 
zeitschrift auf Datenträger! Informatio- 
nen gegen 1,30 DM Rückporto. 
Hacker, Im Winger 10, 5440 Mayen 14 


Münster K2-Commodore C16-CLUB 
sucht Mitstreiter! 

* Selbstgestrickte Software * Tausch * 
64K Erweiterung * Erfahrungsau- 
stausch * Beratung. Info: 02501-58678 


€ 16 wer tauscht mit mir Spiele? 
Habe z.B. Tom, Schach, Baseball,usw. 
Schickt Eure Listen an: Kai Oertel, Su- 
derstr. 9b, 2222 Marnerdeich, Tel.: 
04851/2252 (nur Tape) 


Hallo, C-16-Besitzer! Wer hat Lust mit 
mir Spiele zu tauschen? Schreibt mir 
doch einfach einmal. Holger Greve, It- 
zehoerstr. 15, 2351: Gnutz 


Verkaufe Input 64 Ausgaben 6/85 bis 


9/86 (16 Stück), nur alles zusammen, 
gegen Höchstgebot! Nur schriftliche 
Angebote an: Bernhard Helle, Schüt- 
zenstr. 11, 4100 Duisburg 14 


*** SCHWEIZ *** 

Verkaufe DATA-BECKER-Software 
und Bücher mit 30%. 

Tel. 01 362 88.78 (9-12/18-20 Uhr) 


Ich suche die Zeitschriften 2/86, 3/86 
von Compute mit. 

Sven Mußwitz, An der Naßburg 17, 
6369 Nidderau 1 








Unterschrift 


© Biete Hardware 


Compube mi 


© biete Software 


Ich wünsche folgenden Text zu veröffentlichen: 


© suche 


© Kontakte 


Datum 


Zutreffendes ankreuzen 


© Versch. 
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Heraus 
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MEISTERWERKE DEUTSCHER AUTOREN 
















WINTER OLYMPIADE 


von Udo Gerlz 


Das Spiel der Spiele für alle Besitzer eines C-116, C-16 oder 
Plus/4. 


Ein tolles Sportfest für 1 bis 4 Mitspieler mit 6 Disziplinen, 
Eröffnungsfeier, Wahl der Landesfarben & Hymnen, usw, 


Mit diesem Programm hat Udo Gertz neue Maßstäbe 
gesetzt und wurde dafür soeben von der englischen 
Computerfachzeitschrift COMMODORE COMPUTINS 
INTERNATIONAL mit 3 Oskars ausgezeichnet! 


Und die HAPPY COMPUTER schrieb zu diesem Programm: 
„Was ein deutscher Programmierer da aus dem C16 
herausgeholt hat, ist eine kleine Sensation. ‘Winter 
Olympiade! ist sowohl grafisch als auch spielerisch ein 
Wunder. ... ‘Winter Olympiade’ ist nach unserer Meinung 
das beste C16-Spiel, das derzeit auf dem Markt ist.” 


























Erhältlich auf Kassette/Diskette für Commodore 116, 16, Plus/4. 






SOMMER 
OLYMPIADE 





SOMMER OLYMPIADE 


von Udo Gerz 


Die Fortsetzung der sensationellen Winter Olympiade mit 6 
mindestens genauso guten Disziplinen (u. a. Radfahren, 
Stabhochsprung, Turmspringen und Wildwasserkanu) und 
dem gleichen festlichen Rahmen (Eröffnungszeremonie, 

] bis 4 Mitspieler, Wahl der Landesfarben & Hymnen, usw.) — 
ein Muß für alle Fans von wirklich guten Sportspielen! 


Erhältlich ab Januar ‘87 auf Kassette/Diskette 
für Commodore 116, 16, Plus/4. 
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BRIDGEHEAD von Jörg Dierks 


Der bekannte Legionär ist wieder da: diesmal soll er auf feind- 
lichem Gebiet einen Brückenkopf errichten. 

Horizontal in.beide Richtungen scrollende Spitzen-Grafik mit vielen 
verschiedenen Bildern. 


Erhältlich auf Kassette/Diskette für Commodore 116, 16, Plus/A. 
KARATE KING von Jörg Dierks 


Das endgültige Karatespiel für Ihren Plus/4 mit ausgezeichneter Animation 
durch neuentwickelte Multicolor-Softsprites, die flimmerfreie und schnelle 
Action garantieren ohne störende Farbüberschneidungen. Mehrere 
verschiedene Hintergrundgrafiken sorgen für fernöstliche Stimmung. 

Für 1 oder 2 Spieler. 


Erhältlich auf Kasseftte/Diskette für Commodore 16 (+64K), Plus/A. 
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() Damit Sie sehen, daß wir außer Spielen auch was von „ernsthafter” Software verstehen, hier einige Beispiele: 

\ BUSINESS BASIC von Andreas Arens & Michael Meiszl 

S Das „unmögliche” Modul für den C-64: 61183 Bytes frei für BASIC-Programme und -Variablen sowie über 50 neue BASIC- 
, Befehle! & Erhältlich als Modul für C-64 

2 MICRO DATEI von Jürgen Kuck 

l) Universelles Dateiprogramm für beliebige Daten (z.B. Adressen, Schallplatten, Videos, usw.) Leistungsmerkmale: Freier 
Ä) Aufbau der Eingabemaske auf dem gesamten Bildschirm, Eingeben und Ändern von Datensätzen, Sortieren nach belie- 
() bigen Kriterien, sehr komfortable Ausdruckmöglichkeiten (z.B. selektiert, mit oder ohne Maske, auf Adıeßetiketten), 
() Suchen von beliebigen Ausdrücken, 4 Funktionstasten können frei mit beliebigen Texten belegt werden (dadurch 
‘ schnelle Eingabe von häufig vorkommenden Wörtern), usw. 

x ® Erhältlich auf Kassette/Diskette für Commodore 116, 16, Plus/A. 

S MICRO KALK von Fritz Schäfer 

, Mit diesem Tabellenkalkulationsprogramm können Sie alle Berechnungen durchführen, die tagtäglich anfallen, z.B. Füh- 
? rung einer Haushaltskasse, Einkauf-/Verkauf-Erlös, usw. Leistungsmerkmale: Vielfältige mathematische Funktionen (Addi- 
Ä tion, Subtraktion, Multiplikation, Division, Summe, Durchschnitt, Minimum, Maximum), Einfügen/Löschen von Spalten/Zei- 
d len, Ausdruck des Arbeitsblattes (ganz oder teilweise), Kopieren von Formeln und Werten in andere Zellen, 4 Funktions- 
(\ tasten können frei mit beliebigen Texten belegt werden (dadurch schnelle Eingabe von häufig vorkommenden Wör- 
Ä term), usw. ® Erhältlich auf Kassette/Diskette für Commodore 116, 16, Plus/4 

4 MICRO TEXT von Fritz Schäfer 

Ö) Leistungsfähiges und einfach zu bedienendes Textverarbeitungsprogramm mit vielen Profi-Funktionen. Leistungsmerk- 
‘ male: Texte werden mit integriertem Turbo-Tape auf Kassette abgespeichert, Flattersatz (Iinksbündig), Blocksatz (rechts- 
. bündig), Zentrieren, Suchen und Ersetzen, halbautomatische Wort-Trennung, 4 Funktionstasten können frei mit beliebi- 
S, gen Texten belegt werden (dadurch schnelle Eingabe von häufig vorkommenden Wörtern) usw. Der Textspeicher 
s umfaßt auch mit 16K bereits 6000 Zeichen (mehr als eine DIN A4 Seite). 

) ® Erhältlich auf Kassette/Diskette für Commodore 116, 16, Plus/4. 

4 TURBO PLUS von Andreas Arens 

() Mit: diesem Modul wird Ihr C-16 bzw. Plus/4 um zahlreiche neue Funktionen erweitert, u.a.: fest eingebautes Turbo Tape 
() (8mal schneller laden & speichern von Kassette), daß Programme bis zu 60/K abspeichern kann — zahlreiche neue 
Q) BASIC-Befehle wie OLD, DUMP, WINDOW, MERGE, usw. — ein BASIC-Listing kann mit den Cursor-Tasten vor- und rückwärts 
Ü) gescrollt werden. Als besonderer Clou erlaubt es TURBO PLUS Besitzern eines Plus/4, die eingebaute Software auch mit 
() Kassette zu benutzen! ® Erhältlich als Steckmodul für C-116, C-16 und Plus/4. 
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in den Fachabteilungen von #orlen. SEE KARSTADT 


sowie in allen gutsortierten Computershops und im guten Versandhandel. 
Vertrieb: RUSHWARE und MICRO HÄNDLER, in Österreich: KARASOFT 


ACHTUNG! Wir suchen ständig Programmierer 2 Kl N GSOoO FT 


für fast alle Computer-Typen, die gegen erst- 


i i i i £ Spitzensoftware : 
klassige Bezahlung Spiele von internationalem ZEN Seit. 1983 
Niveau schreiben. \ Made In Germany. 


Wenn Sie Interesse haben, wenden Sie sich F Schäfer, Schnackebusch 4, 
5 noch heute an uns. D-81068 Roetgen, Telefon (024.08) 51 19 
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